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IDENTIFICATION 


PRODUCT CODE: AC-F830D-MC 

PRODUCT NAME: CZDMIDO DMR-11 FCTNL DIAG 
PRODUCT DATE: OCTOBER 1981 

MAINTAINER: DIAGNOSTIC ENGINEERING 
AUTHOR: MIKE O* CONNOR 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR iN THIS DOCUMENT. 


NO RESPONSIBILITY iS ASSUMED FOR THE USE OR RELIABILITY OF 
SOF TWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
AFFILIATED COMPANIES. 
COPYRIGHT (C) 1980, 1981 BY DIGITAL EQUIPMENT CORPORATION 

THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION: 


DIGITAL PDP UNIBUS MAS SBUS 
DEC DECUS DECTAPE 
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E 37 REVISION HISTORY 
38 
39 
rs REVISION REASON DATE 
“s A INITIAL RELEASE 5 FEB 80 
44 
ro B 1. told REMOTE LOOPBACK IN TESTS 17 APR 80 
47 2. BUG FIX = CONTROL C EXIT OF PROGRAM 
48 WOULD CAUSE UNEXPECTED INTERRUPT ON 
49 RESTART = PUT MASTER CLEAR IN CLEAN 
50 UP CODE 
51 3. BUG FIX = DTR WAS DROPPED WHEN WRITING 
52 MODEM MAINTENANCE BIT (AFFECTED MANUF . 
53 TURNAROUND . ) 
55 
56 C ADDED CHECK OF M8207 PROGRAM TIMER IN 20 AUG 80 
57 TEST 10 
59 
60 D 1. AT ENGINEERING'S REQUEST, CHANGED TEST 26 OCT 81 
61 15 SO THAT IT.NO LONGER TESTS DMC MODE 
BASE IN RESUME. ALSO CHANGED TEST 16 
63 SO THAT A MASTER CLEAR IS DONE BEFORE 
64 A BASE _IN RESUME AND TEST 16 NOW ONLY RUNS 
65 IN_ INTERNAL LOOPBACK MAKING THESE CHANGES 
66 GETS AROUND A PROBLEM IN MANUFACTURING. 
67 THE DMR DOCUMENTATION WAS CHANGED TO 
68 SPECIFY THAT A MASTER CLEAR MUST BE DONE 
4 BEFORE A BASE IN RESUME. 
71 2. BUG FIX = ALLOWED 1 REP TO BE SENT IN TEST 
72 14. THIS IS NECESSARY TO MASK THE SOFT 
73 ERROR MESSAGE THAT CAN OCCUR WHEN LARGE 
74 | MESSAGES ARE SENT AT LOW BAUD RATES. 
ie * 


SEQ 0002 





D 1 
CZDMIDO_DMR=11 ees cae te TESTS MACY11 ghee 4 eo a 12:42 PAGE 4 SEQ 0003 
CZDMID.P11 29=JUL=81 11:32 ROGRAM DOCUMEN 


75 
76 
77 CONTENTS 
78 
79 
80 
4 1.0 INTRODUCTION 
‘ 2.0 HARDWARE REQUIREMENTS 
o: 3.0 PRELIMINARY PROGRAM REQUIREMENTS 
87 4.0 GENERAL PROGRAM CONSIDERATIONS 
88 4.1 DIAGNOSTIC SUPERVISOR 
89 4.2 EXECUTION TIME 
90 4.3 XXDP+ 
91 4.4 ACT/SLIDE 
92 4.5 APT 
93 4.6 MEMORY MANAGEMENT 
94 4.7 MEMORY PARITY OPTION 
<4 4.8 ERROR LOGGING 
tf 5.0 PROGRAM LOAD MEDIA 
99° 6.0 OPERATING INSTRUCTIONS 
100 6.1 LOADING AND STARTING PROCEDURES 
101 6.1.1 LOADING PROCEDURES 
102 6.1.2 STARTING PROCEDURES 
103 6.1.3 STEPS FOR QUICK AND SIMPLE EXECUTION 
104 6.2 INITIAL DIALOGUE 
105 6.3 PROGRAM OPTIONS 
106 6.3.1 START COMMAND 
107 6.3.1.1 TESTS SWITCH 
108 . 6.3.1.2 PASS SWITCH 
109 6.3.1.3 FLAGS SWITCH 
110 6.3.1.4 END OF PASS SWITCH 
111 6.3.1.5 EFFECT OF START COMMAND 
112. 6.3.2 RESTART COMMAND 
113 6.3.2.1 TESTS, PASS, AND FLAG SWITCHES 
114 6.3.2.2 UNITS SWITCH 
115 6.3.2.3 EFFECT OF RESTART COMMAND 
116 6.3.3 CONTINUE COMMAND 
117 6.3.3.1 PASS gts 
118 6.3.3.2 sey WITCH 
119 6.3.3.3 EFFECT OF CONTINUE COMMAND 
120 6.3.4 PROCEED COMMAND 
121 6.3.4.1 FLAGS SWITCH 
122 6.3.4.2 EFFECT OF PROCEED COMMAND 
123 6.3.5 ADD COMMAND 
124 6.3.5.1 UNITS SWITCH 
125 6.3.5.2 EFFECT OF ADD COMMAND 
6.3.6 DROP COMMAND 
6.3.6.1 UNITS SWITCH 
6.3.6.2 EFFECT OF DROP COMMAND 
6.3.7 PRINT COMMAND 
6.3.7.1 EFFECT OF PRINT COMMAND 














CZDMIDO DMR=11_ FUNCTIONAL TESTS MACY11 30A(1052) 
CZDMID.P11 :3é 


.% 
29-JUL=81 12:42 PAGE 5 


PROGRAM DOCUMENT 


6.3.8 DISPLAY COMMAND 
6.3.8.1 UNITS SWITCH 
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1.0 INTRODUCTION 


THIS PROGRAM WILL BE IMPLEMENTED USING THE DIAGNOSTIC 

SUPERVISOR AND A STRUCTURED PROGRAMMING APPROACH. BECAUSE 

THE DESIGN WILL CONFORM TO THE SUPERVISOR (STANDALONE 

hae PROGRAM WILL BE COMPATIBLE WITH ACT, APT, XXDP+, 
L . 


THROUGH DIALOGUE WITH THE OPERATOR, THE PROGRAM WILL ALLOW 
MODIFICATION OF DEVICE PARAMETERS, SUCH AS UNIBUS ADDRESS, 
VECTOR ADDRESSES AND TEST CONFIGURATION. IN ADDITION, THE 
OPERATOR CAN SPECIFY PARTICULAR TESTS TO BE RUN AND A 
VARIETY OF LOOPING, RUNNING, AND REPORTING MODES. 


DEVICE ERRORS WILL BE REPORTED AS THEY OCCUR. _ THE REPORT 
WILL INCLUDE A TEST NUMBER AND DESCRIPTION OF THE ERROR, 
Potente BAD TEST DATA, AND APPLICABLE DEVICE REGISTER 


2.0 HARDWARE REQUIREMENTS 


THE FOLLOWING HARDWARE IS REQUIRED TO RUN THE DMR-11 FUNCTIONAL 
DIAGNOSTIC TESTS: 


PDP-11/04,05,10,20,30,3%,35,40,45,50,60, OR 70 
16K MEMORY 

CONSOLE TERMINAL 

DMR~-11 


3.0 PRELIMINARY PROGRAM REQUIREMENTS 


IT IS ADVISED THAT THE STATIC DIAGNOSTICS BE RUN BEFORE THESE FUNCTIONAL 
eetian IT IS ASSUMED THAT THE PROCESSOR IS IN PROPER WORKING 


ENSURE THAT THE SWITCH 1 AT LOCATION E~85 ON THE M8207 IS ON. IF THIS 
SWITCH IS OFF, THE MAINTENANCE BITS IN BSEL1 CAN'T BE USED AND CERTAIN 
TESTS WILL BE NOT BE CORRECTLY RUN. 


WHEN CHOSING A CABLE TEST CONNECTION, ENSURE THAT THE SWITCH PACK 
E-39 ON THE M8203 IS PROPERLY SET UP FOR THE DESIRED INTERFACE. 

IF CHOSING TEST STE. HOWEVER OPTIONS 1-4, IT IS NOT NECESSARY TO 
SELECT THE INTERFACE; HOWEVER THE BAUD RATE MUST BE Sat i. 
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IT_ IS, HOWEVER, NECESSARY TO HAVE THE BAUD RATE SELETCTED TO BE 
WITHIN THE EIA RANGE. 


NOTE THAT A MANUFACTURING-ONLY PATCH IS REQUIRED TO RUN WHEN USING THE 
SPECIAL MANUFACTURING TEST CONNECTORS. THIS PATCH WILL CHANGE THE 
FLAG WORD "MANUF' TO A NON-ZERO VALUE. WHEN THE FLAG IS NON-ZERO, THE 


MAINTENANCE BIT IS SET BY A MODEM WRITC COMMAND IF THE V.35 OR EIA 
ONBOARD CONNECTORS ARE USED. 


4.0 GENERAL PROGRAM CONSIDERATIONS 


4.1 DIAGNOSTIC SUPERVISOR 

THIS PROGRAM IS COMPATIBLE WITH THE STANDALONE DIAGNOSTIC 
SUPERVISOR, AND MUST BE LOADED TO BE CO=RESIDENT WITH THE 
SUPERVISOR, OR BE _ PREVIOUSLY COMBINED WITH THE SUPERVISOR 
AND LOADED AS A SINGLE FILE. IN EITHER CASE, THE COMBINED 
PROGRAM WILL NOT EXCEED 16K OF MEMORY. 

4.2 EXECUTION TIME 


EXECUTION TIME IS DEPENDENT ON THE PROCESSOR SPEED AND THE 
DMR BAUD RATE. EXAMPLES OF EXECUTION TIME 


11/70 WITH CACHE AND DMR AT 2.4K 4 AND 1/2 MINUTES 


11/70 WITHOUT CACHE AND DMR AT 2.4K 5 AND 1/2 MINUTES 
11/34 AND DMR AT 2.4K 10 MINUTES 


4.3 XXDP+ 

THIS PROGRAM MAY BE LOADED UNDER XXDP+, AND MAY BE RUN IN 
DUMP MODE OR CHAIN MODE. 

4.4 ACT/SLIDE 

THIS PROGRAM MAY BE LOADED UNDER ACT OR SLIDE AND MAY BE RUN 
IN DUMP MODE OR CHAIN MODE. 

4.5 APT 

THIS PROGRAM MAY BE LOADED BY THE APT SYSTEM (INCLUDING 
APT-RD) AND RUN IN PROGRAM MODE OR SCRIPT MODE. 

4.6 MEMORY MANAGEMENT 


IF MEMORY MANAGEMENT IS AVAILABLE, IT IS USED BY CERTAIN TESTS IN THIS 
FUNCTIONAL DIAGNOSTIC. 
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4.7 MEMORY PARITY OPTION 


IF PARITY MEMORY IS_ INSTALLED, MEMORY PARITY TRAPS ARE 
DISABLED BY THE PROGRAM. 


4.8 ERROR LOGGING 


AT THE END OF EACH PASS ON ALL UNITS, THE PROGRAM PRINTS OUT 
THE CUMULATIVE TOTAL NUMBER OF ERRORS SINCE THE LAST START OR 
RESTART COMMAND. 


5.0 PROGRAM LOAD MEDIA 


THIS PROGRAM CAN BE LOADED FROM PAPER TAPE USING THE 
ABSOLUTE LOADER OR FROM ACT, SLIDE, OR APT SYSTEMS, OR FROM 
ANY MEDIA SUPPORTED BY XXDP+. WHEN USING THE PAPER TAPE 
ABSOLUTE _ LOADER, THE PROGRAM SHOULD BE LOADED FIRST, 
FOLLOWED BY THE DIAGNOSTIC SUPERVISOR. WHEN USING XXDP+, THE 
DIAGNOSTIC SUPERVISOR SHOULD BE LOADED FIRST, FOLLOWED BY 
THE DIAGNOSTIC PROGRAM. 


6.0 OPERATING INSTRUCTIONS 
6.1 LOADING AND STARTING PROCEDURES 


6.1.1 LOADING PROCEDURES 


THIS PROGRAM MAY BE LOADED FROM PAPER TAPE USING THE 
ABSOLUTE LOADER. IT MAY ALSO BE LOADED FROM ANY XXDP+ LOAD 
MEDIA. WHEN LOADED UNDER XXDP+, THE DIAGNOSTIC SUPERVISOR 
WILL BE LOADED AUTOMATICALLY. 


6.1.2 STARTING PROCEDURES 


THE PROGRAM STARTS AT LOCATION 200. USE STANDARD DEC 
PROCEDURES TO START THE PROGRAM. 


6.1.3 STEPS FOR QUICK AND SIMPLE EXECUTION 


THE DIAGNOSTIC CAN BE EXECUTED STANDALONE UNDER XXDP+, 
WITHOUT READING THE REMAINDER OF THIS DOCUMENT, AS FOLLOWS: 


A) LOAD AND START DIAGNOSTIC USING RUN COMMAND 
B) RECEIVE DIAGNOSTIC SUPERVISOR IDENTIFICATION AND PROMPT (DRS=C>) 
C) ENTER STA<CR> 

) ANSWER HARDWARE AND SOFTWARE QUESTIONS 

) GET END OF PASS MESSAGES OR ERROR MESSAGES 

) TO END EXECUTION, ENTER CONTROL/C 


SEQ 0007 
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6.2 INITIAL DIALOGUE 


AFTER THE PROGRAM AND THE SUPERVISOR ARE LOADED AND THE PROGRAM 


IS STARTED, THE FCLLOWING IDENTIFICATION IS TYPED 


DRS LOADED 
DIAG. RUN-TIME SERVICES 
DR> 


THE OPERATOR THEN PROCEEDS BY TYPING ONE OR MORE OF THE 
COMMANDS DESCRIBED IN THE FOLLOWING SECTION 6.3. (FOR MORE 
DETAILED INFORMATION, REFER TO THE DIAGNOSTIC SUPERVISOR 
FUNCTIONAL SPECIFICATION). 


6.3 PROGRAM OPTIONS 


6.3.1 START COMMAND 


9 9 99 SF SISO ISCO SCOOT IOI II AAI AAAS AIA SIAIASII IIS II SIS SSN SIS 
STA(RT)/TESTS:<TEST=LIST>/PASS : <PASS=CNT>/FLAGS : 
<FLAG-LIST>/EOP:<INCR> 


LASS RASALASALASALALASELALASASALAARASESE LASS A SSSR AS RS ASA SS SS SG 


6.3.1.1 TESTS SWITCH (/TESTS:<TEST-LIST>) 


<TEST-LIST> IS A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC.) OR 
RANGES OF DECIMAL NUMBERS (1-5:8-10 ETC.) THAT SPECIFY THE 
TESTS TO BE EXECUTED. _THE NUMBERS ARE SEPARATED BY COLONS. 
THE NUMBERS RANGE FROM 1 TO THE LARGEST TEST NUMBER IN’ THE 
DIAGNOSTIC. THEY MAY BE SPECIFIED IN ANY ORDER. TESTS WILL 
BE EXECUTED IN NUMERICAL ORDER REGARDLESS OF THE ORDER OF 
SPECIFICATION. THE DEFAULT IS_ TO EXECUTE ALL TESTS. ON 
THIS AND ALL SWITCHES, THE ANGLE BRACKETS <> ARE PUNCTUATION 
USED _IN THE DEFINITION ONLY, AND ARE NOT TO BE TYPED BY THE 
OPERATOR. SEE EXAMPLE AT END OF 6.3.1.5. 


6.3.1.2 PASS SWITCH (/PASS:<PASS-CNT>) 
<PASS~CNT> IS A DECIMAL NUMBER INDICATING THE DESIRED NUMBER 
OF PASSES. A PASS IS DEFINED AS THE EXECUTION * THE FULL 


ON. S 
THE PROGRAM IS ACCOMPLISHED EITHER BY TYPING A CONTROL/C OR 
BY OCCURANCE OF AN ERROR WITH THE HALT ON ERROR FLAG BEING 
A Da! IS A RETURN TO COMMAND MODE. SEE EXAMPLE AT 


6.3.1.3 FLAGS SWITCH (/FLAGS:<FLAG=LIST>) 
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373 
374 <FLAG-LIST> IS A SEQUENCE OF ELEMENTS OF THE FORM <FLAG>, 
375 <FLAG=1>, OR <FLAG=0>, SEPARATED BY COLONS, WHERE <FLAG> HAS 
376 ONE OF THE FOLLOWING VALUES: 
378 HOE HALT ON ERROR, CAUSING COMMAND MODE TO BE 
379 ENTERED WHEN AN ERROR IS ENCOUNTERED 

LOE LOOP ON ERROR, CAUSING THE DIAGNOSTIC TO LOOP 
381 CONTINUOUSLY WITHIN THE SMALLEST DEFINED BLOCK 
382 OF CODING (SEGMENT, SUBTEST, OR TEST) CONTAIN- 
383 ING THE ERROR 
384 IER INHIBIT ERROR REPORTING 
385 IBE INHIBIT BASIC ERR 

(f+ a5) XE INHIBIT EXTENDED ERROR REPORTS 

387 ” PRI DIRECT ALL MESSAGES 70 A LINE PRINTER 
388 PNT PRINT NUMBER OF TEST BEING EXECUTED 
389 BOF BELL ON ERROR 
390 UAM RUN IN UNATTENDED MODE, BYPASSING MANUAL 
391 INTERVENTION TESTS 
392 ISR INHIBIT STATISTICAL REPORT 
393 IDU INHIBIT DROPPING OF UNITS BY DIAGNOSTIC 
5394 LOT LOOP ON TEST 
396 THE FLAGS NAMED OR EQUATED TO 1 ARE SET, THOSE EQUATED TO 0 
397 ARE CLEARED. A FLAG NOT SPECIFIED IS CLEARED. IF THE FLAGS 
398 SWITCH IS NOT GIVEN ALL FLAGS ARE CLEARED. SEE EXAMPLE AT 
399 END OF 6.3.1.5. 
Zon 
402 6.3.1.4 END OF PASS SWITCH (/EOP:<INCR>) 
404 <INCR> IS A DECIMAL NUMBER INDICATING HOW OFTEN (IN TERMS OF 
405 PASSES) IT IS DESIRED THAT THE END OF PASS MESSAGE BE 
406 PRINTED. THE DEFAULT IS AT THE END OF EVERY PASS. SEE 
407 EXAMPLE AT END OF 6.3.1.5. 
408 
409 
rh 6.3.1.5 EFFECT OF START COMMAND 
412 THE EFFECT OF THE START COMMAND IS TO INITIATE THE HARDWARE 
413 PARAMETER DIALOGUE, THE SOFTWARE PARAMETER DIALOGUE, AND 
414 THEN THE DIAGNOSTIC TESTS THEMSELVES. 
416 THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION 
417 H UNITS?"” TO WHICH THE OPERATOR, REPLIES. WITH A DECIMAL 
418 NUMBER N FROM 1 TO 16. THE TERM ‘UNIT’ KEFERS TO THE DEVICE 
419 10 WHICH THIS SERIES OF DIAGNOSTICS IS DEDICATED. FOLLOWING 
420 THIS ARE THE QUESTIONS WHEREBY THE P-TABLES THEMSELVES WILL 
421 BE BUILT. EACH P-TABLE IS A CORE-RESIDENT TABLE CONTAINING 
422 ALL THE HARDWARE INFORMATION FOR ONE UNIT. THE OPERATOR 
423 MUST SUPPLY N (NUMBER OF UNITS) VALUES FOR EACH QUESTION. 
424 HE MAY DO THIS BY GIVING ONE ANSWER TO EACH QUESTION (IN 
425 WHICH CASE THE SERIES OF QUESTIONS WILL BE POSED N TIMES) OR 
426 BY GIVING N VALUES, SEPARATED BY COMMAS, TO EACH QUESTION 
427 (SERIES WILL BE POSED ONCE). EACH QUESTION IS FOLLOWED BY 


428 THE RESPONSE RADIX (D FOR DECIMAL, B FOR BINARY, O FOR 
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OCTAL, L_FOR YES/NO) IN PARENTHESES AND THE DEFAULT VALUE 
AFTER THE PARENTHESES. 


FOLLOWING THE HARDWARE QUESTIONS ARE THE SOFTWARE QUESTIONS 
TO BUILD THE SOFTWARE TABLES, WHICH DEFINE THE MODE (QUICK 
VERIFY ETC.) THAT THE DIAGNOSTIC WILL EXECUTE IN. 


WHEN THE QUESTION '# UNITS?°’ IS ANSWERED, MEMORY STORAGE IS 
ALLOCATED FOR THE P-TABLES, AND IF THERE is _NOT ENOUGH TO 
ACCOMMODATE THEM THE MESSAGE ‘TOO MANY UNITS'' IS ISSUED. IN 
af ag eames MUST BE EXECUTED MORE THAN ONCE TO 


EXAMPLE : 
STA/TESTS:1:2-4:6:8-10/PASS :3/FLAGS : IER: HOE=1 : UAM:LOE 


THIS COMMAND WILL CAUSE THREE rg TO BE MADE, EACH PASS 
age tow OF TESTS 1,2,3.4,6.8.9, AND 10 EXECUTED AGAINST 

L UNITS. THERE IS NO DIFFERENCE BETWEEN SAYING <FLAG> AND 
SAYING <FLAG=1>. THE NOTATION <FLAG=0> IS MEANINGFUL ONLY ON 
A COMMAND OTHER THAN START TO CLEAR A FLAG THAT WAS 
PREVIOUSLY SET. NOTE THAT ON ALL COMMANDS ONLY THE FIRST 
THREE LETTERS ARE SCANNED. 


6.3.2 RESTART COMMAND 


SASSI IOISIOISISISIOIIOISIOIOIIIISINISIIOIOIUIUIOIOIOIIIOIOIUICIOIOIOII IOI OIOIOIOISI II IOI IO 
RES(TART)/TESTS:<TEST=LIST>/PASS : <PASS-CNT>/FLAGS: 
<FLAG=LIST>/UNITS:<UNIT=LIST> 


(ARRAS SALALAALASLASELALARASALASASSASAA AAA ALAS ALA SSAA LASS S| 


6.3.2.1 TESTS, PASS, AND FLAGS SWITCHES 
<TEST=LIST>, <PASS-CNT>, AND <FLAG-LIST> ARE AS IN THE START 
COMMAND . 


6.3.2.2 UNITS SWITCH (/UNITS:<UNIT=LIST>) 


<UNIT=LIST> IS A SEQUENCE OF DECIMAL 2 (0,1 ETC.) OR 
RANGES OF DECIMAL NUMBERS (0-5, a ETC.) THAT SPECIFY THE 
UNITS TO BE TESTED. THE NUMBERS ARE SEPARATED BY COLONS. 
THE NUMBERS MAY RANGE FROM 0 THRU N-1_ (N_ IS THE NUMBER OF 
UNITS SPECIFIED IN THE ie START COMMAND). THE NUMBER 


ROP C ° 
SEE THE DISCUSSION OF ADD AND DROP COMMANDS BELOW. DEFAULT 
iat ALL UNITS WHICH HAVE NOT BEEN DROPPED BY A_ DROP 


6.3.2.3 EFFECT OF RESTART COMMAND 
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485 

486 THE RESTART COMMAND DIFFERS FROM THE START COMMAND IN THAT 
487 aa P=TABLES FROM THE PREVIOUS START COMMAND (THERE MUST 
488 AVE BEEN ONE) ARE USED, INSTEAD OF NEW ONES BEING BUILT. 

489 THE UNITS SWITCH GIVES THE ABILITY TO SELECT A_ SUBSET OF 
490 THESE. THE SOFTWARE DIALOGUE MAY OPTIONALLY BE REEXECUTED 
491 (OPERATOR WILL BE ASKED). THE COMMAND CAN BE USED AFTER 
492 COMMAND MODE HAS BEEN REENTERED IN ANY OF THE THREE NORMAL 
493 WAYS: A) THE REQUESTED NUMBER OF PASSES HAVE BEEN MADE 8) 
494 AN ERROR WAS ENCOUNTERED WITH THE HALT ON ERROR FLAG SET C) 
ree A CONTROL/C WAS ENTERED BY THE OPERATOR. 

497 

yh 6.3.3 CONTINUE COMMAND 

500 PARES ASASALASAAAALALASASALASRASALASALALEAS ALAA AAR ARAL ASSES DY 

501 CON(T INUE) /PASS : <PASS=CNT/FLAGS : <FLAG=LIST> 

502 PRASRASSSLLESSALASALASLASEALASLASALS ASSES EASELS ALA SA SRR ARS AAAS ES SS | 

503 

504 

44 6.3.3.1 PASS SWITCH (/PASS:<PASS=CNT>) 

507 <PASS~CNT> IS SAME AS IN START COMMAND, BUT THE DEFAULT IS 
508 THE UNSATISFIED PASS-CNT FROM THE PREVIOUS START OR RESTART. 
44 IF NONE REMAINS, THE DEFAULT IS NON-ENDING EXECUTION. 

511 

ai¢ 6.3.3.2 FLAG SWITCH (/FLAGS:<FLAG=LIST>) 

514 <FLAG=LIST> IS SAME AS IN_ START COMMAND, BUT UNSPECIFIED 
ay FLAGS RETAIN THEIR CURRENT VALUE. 

517 

318 6.3.3.3 EFFECT OF CONTINUE COMMAND 


CONTINUE MUST FOLLOW A START OR RESTART, AND COMMAND MODE 
MUST HAVE BEEN ENTERED DUE TO A_ HALT ON ERROR OR A 
CONTROL/C. THE EFFECT OF THE COMMAND IS TO GO TO THE 
BEGINNING OF THE TEST THAT WAS BEING EXECUTED WHEN THE HALT 
OR CONTROL/C TOOK PLACE. SOFTWARE DIALOGUE MAY OPTIONALLY 
BE REEXECUTED. HARDWARE PARAMETERS MAY NOT BE CHANGED. 


6.3.4 PROCEED COMMAND 

TUSSI IIOIOIOIOIUISIOIIINIOIOIIISIOUIOIOIUIISIIIUIDO Onn oink 
PRO(CEED) /FLAGS :<FLAG=LIST> 

TEU IIUISIIIIIUIUIIUIIISIIIUU II IO iok it iii tkit 


6.3.4.1 FLAGS SWITCH (/FLAGS:<FLAG-LIST>) 


<FLAG=-LIST> IS ASIN THE START COMMAND, BUT UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VALUE. 
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6.3.4.2 EFFECT OF PROCEED COMMAND 


PROCEED MUST FOLLOW A START, RESTART, OR CONTINUE. COMMAND 
MODE MUST HAVE BEEN ENTERED VIA A HALT ON ERROR. THE EFFECT 
OF THE COMMAND IS TO BEGliv EXECUTION AT THE LOCATION 
FOLLOWING THE ERROR CALL. NEITHER HARDWARE NOR SOFTWARE 
PARAMETERS MAY BE ALTERED. 


6.3.5 ADD COMMAND 


PASAASAASESELELALESASASLE RASA SASESLALASL SSSA SAAR AAAS ASAD SS S| 


ADD/UNITS:<UNIT=LIST> 


PARRA SRASAAAALSSALALESALALLASASASSSASAS AAAS SALAS ASA SALAS SSS SE | 


6.3.5.1 UNITS SWITCH (/UNITS:<UNIT=LIST> 
<UNIT=LIST> IS AS IN THE RESTART COMMAND. 


6.3.5.2 EFFECT OF ADD COMMAND 


THE UNITS SPECIFIED ARE ADDED TO THE TEST more EACH 
UNIT MUST HAVE A P=TABLE IN MEMORY DUE_ TO AN EAR _— 
HARDWARE DIALOGUE. THIS COMMAND MUST BE FOLLOWED BY 
RESTART OR CONTINUE. THE UNITS SWiTCH MUST BE SPECIFIED. 
THE ADD COMMAND IS MEANINGFUL ONLY FOR UNITS THAT WERE 
PREVIOUSLY DROPPED. 


6.3.6 DROP COMMAND 

BAUS IOIUIUISIOISIIIOIUIUINISISISISISISIIUISIOISISIIDIOIOIOIOIIOIOIISOIUIOINI IOI 
DRO(P) /UNITS: <UNIT=LIST> 

FOI III IIIS III IIIS III IIIS III II III III IIIT 


6.3.6.1 UNITS SWITCH (/UNITS:<UNIT=LIST>) 
<UNIT=LIST> IS AS IN THE RESTART COMMAND. 


6.3.6.2 EFFECT OF DROP COMMAND 


THE UNITS SPECIFIED WILL BE DROPPED FROM Ls aba THE UNITS 
WILL BE RESELECTED ONLY A. THE EXECUTION OF AN ADD OR_ START 
COMMAND. THE UNITS SWITCH MUST BE ENTERED. THIS COMMAND 
MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND. 


6.3.7 PRINT COMMAND 


(ARS SSSSSALLESSASASASELEAAASAS ASSES ASER RARER RAS ASR RASA RRA RSS SS | 


PRI (NT) 


SEQ 0012 
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(LARS SSASSALALLASLASLALALASASALALALASLAAALASAS ASSESS ASSESS ESS SS SG 


6.3.7.1 EFFECT OF PRINT COMMAND 
THE TOTAL NUMBER \ ERRORS FOR EACH UNIT SINCE THE LAST 


START OR RESTART COMMAND ARE PRINTED. THE ISR (INHIBIT 
STATISTICAL REPORTING) FLAG IS CLEARED. 


6.3.8 DISPLAY COMMAND 


(ASRS SALAAAASALALALALALASASASASESASALE SA SASS ESAS SLES S SESS SG 


DIS(PLAY) /UNITS:<UNIT=LIST> 

FOCI I III ICICI OIRO ICICI IOI III IIT TITAS ASIA SASSI AISA A. 
6.3.8.1 UNITS SWITCH (/UNITS:<UNIT=LIST>) 

<UNIT=LIST> IS AS IN THE RESTART COMMAND. 


6.3.8.2 EFFECT OF DISPLAY COMMAND 
THE HARDWARE P=TABLES FOR ALL UNITS UNDER TEST ARE PRINTED 
OUT IN THE FORMAT IN WHICH THEY WERE ENTERED. ANY UNITS 


THAT WERE DROPPED BY THE OPERATOR ‘DROP’' COMMAND ARE SO 
DESIGNATED. 


6.3.9 FLAGS COMMAND 


PASSA SLSSASAALESEASASASASASSAARASLASSESSASS EASES ESSA SES ESS SAS SES 


FLA(GS) 


PPS RAASLAAALASALELASALASEAALA LASALLE SSSA SSE SESS ESAS SSE SESS SESS 


6.3.9.1 EFFECT OF FLAGS COMMAND 
THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED. 


6.3.10 ZFLAGS COMMAND 


(ARRSAALASLASALALALSLELALALSASALLLALESLS LASER ASSESSES ESAS ASS SE | 


ZFL (AGS) 


(ARERR AESSALSSASELALASASSALASALESELESASE SERS SERS ARSE RASS SEAS SY 


6.3.10.1 EFFECT OF ZFLAGS COMMAND 
ALL FLAGS ARE CLEARED. 


6.3.11 CONTROL CHARACTERS 


jadetipunts Paige eee a eee Semen nee 
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653 A CONTROL C_(C) ENTERED DURING THE EXECUTION OF A DIAGNOSTIC CAUSES 
o28 A RETURN TO COMMAND MODE. 
656 A CONTROL Z_ (Z) ENTERED DURING ONE OF THE THREE OPERATOR 
657 ret aes HARD CORE QUESTIONS (SEE 6.2), rT DIALOGUE 
658 (SEE 6.3.1.5), OR SOFTWARE DIALOGUE (SEE 6.3.1.5) CAUSES THE 
44 DEFAULTS TO BE TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 
661 A CONTROL O (0) ENTERED DURING THE a ig ~ OF A DIAGNOSTIC 
662 CAUSES ALL TELETYPE OUTPUT TO BE SURPRESSED FOR THE 
663 REMAINDER OF THE DIAGNOSTIC OR UNTIL. ANOTHER O IS_ TYPED, 
ote WHICH RESTORES NORMAL TELETYPE OUTPUT. 
666 
roth 6.5.12 HARDWARE PARAMETERS 
669 THE FOLLOWING 3 QUESTIONS WILL BE ASKED ON A START COMMAND. 
670 THE VALUE LOCATED TO THE LEFT OF THE QUESTION MARK I[S_ THE 
671 DEFAULT VALUE THAT WILL BE TAKEN ON A CARRIAGE RETURN 
678 RESPONSE. 
on 1. CSR ADDRESS: (0) 160070? 
676 THIS IS THE ADDRESS AT WHICH THE CSR REGISTERS (SELO) RESIDE 
677 ON THE UNIBUS. THE ALLOWABLE RANGE IS 160000-177776 
e559 (OCTAL), AND THE DEFAULT VALUE IS 160070. 
44 2. VECTOR ADDRESS: (0) 300 ? 
682 THIS IS THE ADDRESS OF THE INPUT INTERRUPT VECTOR FOR THIS 
683 DEVICE. THE ALLOWABLE RANGE IS 000-776 (OCTAL), AND THE 
eee DEFAULT VALUE IS 300. 
686 3. TEST CONFIGURATION - 
687 0 = INTERNAL (NO CONNECTOR) 
688 1 = H3254 = V.35 (NOTE: MODE 1-4 ALLOWS 
689 2 = H3254 - Thi M9 py PROGRAM INTERFACE SELECTION) 
690 3 = H3255 - ats 423 
691 4 = H3255 = RS422 
692 5 = ‘a. E AND DSi PACK INTERFACE SELECTED 
693 V.35-H3250, INTEGRAL-BC55A-10, RS232C~H325, apcorhaawtaest) 
694 * SELECT THE FOLLOWING ONLY IF THE MODEM SUPPORTS LOOPBACK 
695 6 = LOCAL LOOP 
696 7 = REMOTE LOOP 
od (0) 5? 
699 THIS QUESTION WILL COVER ALL THE POSSIBLE TEST CONFIGURATIONS, 
700 THE DEFAULT IS FOR ACTUAL CABLE LOOPBACK (5). CONFIGURATION 0 
701 WILL ENABLE LINE UNIT (TTL) LOOPBACK. IF THIS IS SELECTED NO 
702 CABLES OR CONNECTORS SHOULD BE CONNECTED. CONFIGURATIONS 1-4 
703 WILL SELECT THE INTERFACE REGARDLESS OF THE SWITCH SETTING AS 
ee LONG AS THE PROPER BAUD RATE IS SELECTED (I.E. EIA = 2.4K-19.2k). 
706 


707 6.3.13 SOFTWARE PARAMETERS 
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THE ONLY SOFTWARE PARAMETER QUESTION ASKED BY THE DIAGNOSITC 
CONCERNS A SOFTWARE TIMEOUT VARIABLE THAT IS USED TO PREVENT 
SOFTWARE ‘'HUNG’’ CONDITIONS. THIS VARIABLE IS A VALUE FORM 1-5. 


SELECTABLE PROGRAM LOOP_TIME-OUT VARIABLE 
CREFER TO LISTING 6.3.13] (MAX=5; MIN=1) (0) 5 ? 


THERE ARE TWO FACTORS THAT SHOULD BE CONSIDERED WHEN ANSWERING 
THIS QUESTION. THE FIRST IS PROCESSOR SPEED; THE FASTER THE 
PROCESSOR THE HIGHER THE VARIABLE SHOULD BE. THE SECOND IS 
BAUD RATE; THE SLOWER THE DMR BAUD RATE THE HIGHER THE VARAIBLE 
SHOULD BE. FOR EXAMPLE: 


11/70 WITH ae AND DMR AT 1 MEG.: 4 
11/34 AND DMR AT 56K: 2 
11/40 AND DMR AT 2.4K: 3 


THE DEFAULT IS 5. THIS WILL COVER THE WORST CASE (J.E. 11/70 
WITH CACHE AND THE DMR AT 2.4K). 


6.3.14 EXTENDED DISCUSSION OF P-TABLE DIALOGUE 


THE FULL CAPABILITY OF THE HARDWARE DIALOGUE IS REVEALED BY 
THE FOLLOWING DISCUSSION OF WHAT HAPPENS INTERNALLY. 


AS SOON AS THE QUESTION '# UNITS?"' IS ANSWERED (WITH THE 
NUMBER N, SAY) SPACE IN CORE IS ALLOCATED FOR N P-TABLES. 
ALL OF THE P-TABLES ARE OF THE SAME FORMAT, AND THERE IS A 

ONE-TO ONE CORRESPONDENCE BETWEEN p> A HARDWARE PARAMETER 
QUESTIONS AND THE SLOTS IN THE P-TABLE F T. 


ON THE FIRST IRIP THRU THE QUESTIONS, ALL OF THE SLOTS IN 
ALL_ OF _ P-TABLES ARE FILLED. IF THE OPERATOR TYPES IN 
LESS THAN N EXPLIC:* VALUES IN RESPONSE TO A_ PARTICULAR 
QUESTION, THESE VALUES ARE PLACED IN THE P-TABLES (ONE VALUE 
GOING INTO THE PROPER SLOT OF EACH P=TABLE BEGINNING WITH 
THE FIRST P-TABLE) UNTIL THE STRING OF VALUES IS EXHAUSTED. 
THE LAST VALUE IN THE STRING BECOMES THE NEW DEFAULT AND IS 
USED TO FILL THAT SLOT IN THE REMAINING P-TABLES. 


ON SUBSEQUENT TRIPS THRU THE QUESTIONS, THE SAME og IS 
CARRIED OUT, EXCEPT THAT THE EARLIEST P-TABLE NOT HAVE 
RECEIVED AN EXPLICIT VALUE IN ANY OF ITS SLOTS NOW TASSUMES 
THE ROLE THAT TABLE NUMBER ONE PLAYED IN THE FIRST TRIP. 


THE SERIES OF QUESTIONS IS REISSUED UNTIL AT LEAST ONE 
QUESTION HAS RECEIVED N EXPLICIT VALUES FROM THE OPERATOR. 


IN GIVING A STRING OF VALUES, COMMAS WITHOUT INTERVENING 
a i Md USED TO INDICATE A REPETITION OF THE LAST 


A STRING OF VALUES MAY BE GIVEN AS _A RANGE (6-10 FOR 
EXAMPLE). IF THE VALUES REPRESENT PURE NUMERICAL DATA, THiS 


SEQ 0015 
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SAMPLE _ RANGE e he oh TO THE STRING 6,7,8,9,10 (AN 
INCREMENT OF 1). IF THE VALUES ARE ADDRESSES, THE SAMPLE 
RANGE TRANSLATES TO THE STRING 6,8,10 (AN INCREMENT OF 2). 


NOW LET US SEE HOW WE COULD USE THESE CAPABILITIES TO 
CONSTRUCT A_SET OF P=TABLES. ASSUME THAT WE HAVE 16 UNITS, 

AND THAT THERE ARE THREE vt + gy Bs PARAMETERS FOR EACH (THREE 
SLOTS IN THE P=TABLE, THREE HARDWARE QUESTIONS IN_ THE 
DIALOGUE). _LET THE DESIRED VALUE FOR THE FIRST PARAMETER BE 
THE NUMBER 75 FOR ALL 16 AS LET THE ee VALUE FOR 
THE SECOND PARAMETER BE EQUAL TO THE UNIT NUMBER 
0,1,2,....15) EXCEPT FOR UNIT 12, WHICH SHOULD RECEIVE THE 
VALUE 11. LET THE DESIRED VALUE FOR THE THIRD PARAMETER BE 
THE NUMBER 76 FOR THE FIRST 7 UNITS AND THE NUMBER 77 FOR 
THE LAST 9 UNITS. 


THE FOLLOWING DIALOGUE WOULD ACCOMPLISH THIS GOAL: 
# UNITS (D) ? 16 
UNIT 0 


<QUESTION 1> ? 75 
<QUESTION 2> ? 0-6 
<QUESTION 3> ? 76 


UNIT 7 

<QUESTION 1> ? 

<QUESTION 2> ? 7-11,,13-15 
<QUESTION 53> ? 77 


- 


SEQ 0016 
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THE FIRST TIME THE SERIES IS ASKED, SLOT ONE RECEIVES A 75 
IN ALL 16 TABLES. SLO? TWO RECEIVES THE VALUES _0,1,2,...,6 
IN TABLES 0 THRU 6 AND A CONSTANT 6 IN TABLES 7 THRU 15. 
SLOT THREE RECEIVES A CONSTANT 76 IN ALL 16 TABLES 


THE SECOND TIME THRU THE SERIES, TABLES 7 THRU THE END ARE 

GOING TO BE AFFECTED (NOTE THAT THIS PIECE OF INFORMATION IS 

PRINTED OUT FOR THE THE OPERATOR IN THE FORM ‘UNIT XX‘' AT 

THE BEGINNING OF EACH SERIES). QUESTION_1 IS RESPONDED TO 

BY A <CR>, SO SLOT ONE STAYS AT CONSTANT 75 IN TABLES 7 

THRU 15, SINCE NO NEW kt he VALUES ARE TYPED IN. SLOT TwO 

GETS THE VALUES 7,8,9.10,11 IN TABLES 7 THRU ite AND 

GETS AN 11 IN SLOT i2, AND GETS THE VALUES 13,14,15_IN 

tat THRU 15. SLOT THREE GETS THE VALUE 77 IN TABLES 7 
U . 


THE DIALOGUE IS TERMINATED WHEN THE SOFTWARE RECOGNIZES THAT 
16 EXPLICIT VALUES HAVE BEEN GIVEN FOR AT LEAST ONE QUESTION 
(NAMELY QUESTION 2). 


SEQ 0017 


,e¢ 
CZDMIDO DMR-11 woe og ® TESTS MACY11 30A(1052) 29=JUL=81 12:42 PAGE 19 SEQ 0018 
CZDMID.P11 29-JUL-81 11:32 PROGRAM DOCUMENT 


7.0 DEVICE INFORMATION TABLES 
SEE THE GLOBAL EQUATES SECTION FOR DEVICE CSR BIT DEFINITIONS 


8.0 TEST DESCRIPTIONS 


SOI IOIOIUISINIISIOIOIUIOISISISIOIDIUIOIOIOISISI ISI IOISIOICISII II IOIOI IIIT I IIIT 
TEST 1 = DMR-11 

VERIFY THAT ADDRESSING THE 4 UNIBUS CSRS DOES NOT CAUSE A NON- 

EXISTENT MEMORY TRAP. 


THE DMR IS AN NPR DEVICE RESIDING ON A UNIBUS. COMMUNICATION 
BETWEEN THE MAIN CPU AND THE DMR IS ACCOMPLISHED THROUGH A 
SET OF FOUR 16-BIT UNIBUS CONTROL AND STATUS REGISTERS (CSRS). 
THE FOUR REGISTERS ARE ASSIGNED ADDRESSES IN THE I/0 PAGE 
FLOATING ADDRESS SPACE: 76XXX0 = 76XXX6 


NOTE: THIS TEST IS REDUNDANT IN THAT STATIC LOGIC TESTS SHOULD 
HAVE BEEN RUN BEFORE THESE FREE-RUNNING TESTS WERE STARTED, AND 
THEY SHOULD HAVE DETECTED ANY CSR ADDRESSING PROBLEMS. 

BUT JUST IN CASE THOSE STATIC TESTS AREN'T RUN, WE'LL BE SAFE. 


IAS RSSEAAASALASASLALALEAASLESALESASASASASA SARA SASS ASA RASA SARA SASS SS | 


** see an enHnHR He RRR SE 


yg naecteatia “ar yg ~~ woe aoa eeiee em mmroaene. 
ST 2 = DMR-11 

;* = ROM CRC/CCITT = CHECK ROM POSITION AND oe ease '' THE 

;* LAST 4 BYTES CONTAIN INFORMATION ABOUT THE ROM TO CHECK. THE 1ST 

;* OF THESE BYTES CONTAINS | ete VERSION NUMBER. THE 2ND BYTE 

;* CONTAINS THE ROM NUMBER. E 3RD AND 4TH BYTES CONTAIN A NEGATIVE 

;* CRC/CCITT WORD FOR THE kom.” 


“hed CHIP ADDRESS RANGE 

® LOCATION CHIP NO. BYTE ADDRESS RANGE 

* E03 0 LOW 0000 - 1777 

* E02 1 HIGH 0000 - 1777 

* E04 2 LOW 2000 - 3777 

* E01 3 HIGH 2000 - 3777 

* EOS 4 LOW 4000 - 5777 

° E14 5 HIGH 4000 - 5777 

* 

skkkkkekkkekbkeee TMPORTANT ' FEEL EEL eae eee REE EERE ERE 


;* FOR THIS TEST TO RUN CORRECTLY, ENSURE THAT SWITCH 1 AT LOCATION 
:* £85 ON THE M8207 IS ON. IF THIS SWITCH IS OFF, BSEL1 WILL BE 
:* LOCKED OUT AND THE MAINTENANCE FEATURES WILL NOT BE ENABLED. 


'MARARERALAAAALSZLLALLLALALASALEALALELASE LARA ASRS LA RASA RLS RAR RA ALAS SD SD 


7 SUBTEST 1 = ON THE FIRST PASS PRINT THE VERSION # IN EACH ROM 
;@ SUBTEST 2 = GENERATE THE CRC-CCITT IN EACH ROM AND COMPARE IT 
‘bod IT AGAINST THE CRC BLASTED IN THE ROM 
-* 
** 
** 


SUBTEST 3 = COMPARE THE ROM # BLASTED IN THE ROM AGAINST THE 
EXPECTED ROM #, 


LAR RSRERAASSALESSELESASARE SESSLER RRR RRR RRR RAR RR RR RRR RAR RRR RAR RASA ASS OD | 
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869 
7 
asy 5 TPORBBRESBSASAASLALLALALALALALASALASLALASLESEALESESAR ESAS RSE ERAS ESAS SSSR RSA SSS SS Of 
872 3* TEST 3 = DMR-11 
873 :* MASTER CLEAR 
874 :* THIS TEST WILL ISSUE 2 MASTER CLEARS. EACH CALL TO THE MASTER 
875 :* CLEAR ROUTINE WILL ENSURE THAT THE RUN BIT WILL BE SET. ALSO 
876 :* THE MASTER CLEAR WILL CAUSE THE DIAGNOSTIC MICROTESTS TO BE 
877 :* RUN WHEN THE MICRODIAGNOSTIC BIT (BIT 13 IN SELO) IS CORRECTLY 
878 :* SET OR CLEARED. BECAUSE THE RUNNING OF MICROTESTS DEPENDS ON THE 
879 3* EXCLUSIVE OR OF THE HARDWARE SWITCH 10 ON E134 OF THE M8203 AND 
880 :* THE MICRODIAGNOSTIC BIT, WE CAN'T KNOW WHETHER THE SETTING OR 
881 :* CLEARING OF BIT 13 WILL RESULT IN THE RUNNING OF MICROTESTS. 
882 :* THEREFORE THE MASTER CLEAR SUBROUTINE WILL TOGGLE (I.E. SET 
883 :* BIT 13 ONLY ON EVERY {OTHER MASTER CLEAR) THE SOFTWARE BIT. 
884 :* THIS WILL ENSURE T REGARDLESS OF THE POSITION OF THE 
885 :* HARDWARE SWITCH, MICROTESTS WILL BE RUN EVERY OTHER MASTER CLEAR. 
886 :* WHEN RUNNING THIS TEST, WE EXPECT TO ADD THE RESULTS OF BSEL3 
887 :* AFTER EACH MASTER CLEAR. 
888 3* BSEL3 = 100 - MICROTESTS DISABLED 
889 :* BSEL3 = 200 - MICROTESTS RUN SUCCESFULLY 
890 :* IF THE RESULT OF THE 2 MASTER CLEARS IS NOT 300, AN ERROR IS 
441 :* REPORTED. 
** 
893 z* ADDITIONALLY THIS ROUTINE WILL REPORT WHENEVER THE RESULT OF 
894 >* BSEL3 IS 0. THIS WILL MEAN THAT THE DEVICE IS NOT A DMR 
895 7* (I.E. DMO) 
896 DEREK REE E REE REE EEEEEREEEKEEE EH 
897 
898 
899 
900 
901 Z MSR SSASA£2A2 £2 22 ER SSSSLLASRASESESES SARS SERASRASARR AREAS ASSARARASA SALAS SS SE | 
902 : TEST 4 = DMR-11 
ae :* BASE IN COMMANDS 
** 
905 :* SUBTEST 1 = ISSUE A BASE IN - DMR MODE. 
906 i* ENSURE THAT THE DMR MODE BIT (BIT 4) IS SET IN 
907 7 THE MICROCODE SCRATCH PAD 7 AND THAT THE DDCMP 
908 se MES SAGE VARIABLES ARE PROPERLY INITIALIZED. 
909 z* SUBTEST 2 - ISSUE A BASE IN = DMC MODE. 
910 i* ENSURE THAT THE DMC MODE BIT (BIT 4) IS CLEAR IN 
911 i* THE MICROCODE SCRATCH PAD 7 AND THAT THE DDCMP 
ote 7 MESSAGE VARIABLES ARE PROPERLY INITIALIZED. 
*“* 
914 : PRERRRRSASASBASLASZASZALASZELSLEASLALLESSLE SEER EERE RRS R ERS RRR RRR R REARS RARE SRSA SS | 
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—MASRAASESZALAALALALSSALARAAALALALAASALAS ALARA SAAR ESAS ASA SE AAR ARDS SSS SS 


TEST 5 = DMR=11 


DMR_COMMANDS 
SUBTEST 1 = tae AN ENABLE EXTENDED ERROR COMMAND AND CHECK THAT 
E EXT. ENABLE BIT IS SET IS SCRATCH PAD 13. THEN 
DISABLE EXTENDED ERROR AND CHECK THAT THE ENABLE BIT 


IS_CLEAR. 

SUBTEST 2 = SET REP/SEL TIMER VALUE AND SET THE DMR THRESHOLD 
VALUES. CHECK THAT THE VALUES ARE sate ECT IN 
THE BASE TABLE AFTER HALTING THE DMR 


-* 
-* 
'* 
-* 
2 
2 
** 
-* 
-* 
~@ 
2 
** 


LAR RRRSASARSASLSAALASASARASAARA ALAA AS AAAS AR ASS SARA SARA ASRS RSE S SS SD | 


IISA IIIIDIOIIIIIIOIIIUIOIIIIOI SSIS IOI OI I 
;* TEST 6 = DMR-11 
CONTROL IN COMMAND TEST - 
SUBTEST 1 = CONTROL IN, FULL DUPLEX, DDCMP MODE. ENSURE THAT 
nt HALF=DUPLEX BIT IS CLEAR IN THE MODEM STATUS WORD, 
ALSO ENSURE THAT DDCMP MODE BIT IS SET IN SCRATCH PAD 7. 
SUBTEST 2 = fT ier HALF DUPLEX. ENSURE THAT THE HALF DUPLEX 


oe 

-* 

*'@ 

** 

-«* 

-* 

;* SUBTEST 3 = CONTROL IN, MAINTENANCE MODE. ENSURE THAT MAINT. MODE 
;* BIT IS SET IN SCRATCH PAD 7. 

;* SUBTEST 4 = CONTROL IN USING SELECTED LOOPBACK. — A Seti IN 
el USING THE USER SELECTED LOOPBACK. IF THE LOOPBACK IS 
7 NOT CORRECT, DMR RUN MODE ACKNOWLEDGE WILL NOT BE 

;* RECEIVED. 

-* 
-* 


-RAeSSRARASAASESERSELERSARASAS ARERR RAS ERARRA REAR AR AR ARRAS ARERR RRR A SAS DSS | 


eee eT iti t titi iii ii iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii 
TEST 7 = DMR-11 
* MODEM WRITE COMMAND 

;* SUBTEST 1 = WRITE DATA PATTERNS INTO THE MODEM ty eo 

;@ ENSURE THAT ON THE NEXT MODEM READ T THE 

;* MICROCODE RETURNS jae. PATTERN WRITTEN INTO BSEL6. 

;* SUBTEST 2 = ATTEMPT TO WRITE BOTH THE HALF~-DUPLEX BIT AND THE 

;* RTS HOLD BIT. THE MICROCODE SHOULD NOT ALLOW THIS 
; TO HAP 
se 
t* 
te 


PEN. WHEN READING THE mates STATUS, ONLY 
THE HALF=DUPLEX SHOULD BE SET 


(LAR RRSESASSALERSSERESRSRRSRASAR AREER ESE R RRR RRR RRR RRR RRRRAR RRR RRR R AAS AS A | 
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967 ERR AAR AAA ER EAE RE EERE ARAE AREER ERE SS 

968 7* TEST 8 = DMR~-11 

969 ;* SUBTEST 1 = TRANSMIT A BUFFER THREE TIMES WIHOUT ASSIGNING A 

970 :* RECEIVE BUFFER. a eye A_NO BUFFER THRESHOLD 

971 s* OF THREE, ENSURE THAT A NO BUFFER ERROR IS RECEIVED 

972 3* AFTER THE THIRD THRANGM SSION. 

973 7* SUBTEST 2 = TRANSMIT A BUFFER WITHOUT A RECEIVE BUFFER. 

974 ge ASSIGN THE NAKS THRESHOLD OF 3 AND A NO BUFFER 

975 3* THRESHOLD OF 7. CHECK THAT THE NAKS ERROR COUNT IS 

976 :* THREE AFTER SHUTDOWN 

977 ERA E RE AEEE ERE EEAEEA AEE AEEEE ARERR RARER EERE EES 

978 

979 

0 

982 ne coe Me aa ee ee ee eee a 

983 : TEST 9 = DMR-11 

984 . NON-EXISTENT MEMORY (NXM) ERROR CHECK 

985 ;* PERFORM DMR COMMANDS USING NXM ADDRESSES; VERIFY THAT NXM ERROR IS 

986 ;* REPORTED IN EACH OF THE FOLLOWING SUBTESTS: 

987 ;* SUBTEST 1 BASE IN RESUME COMMAND - BASE TABLE ADDRESS IS NXM 

988 3* SUBTEST 2 = BA/CC IN RECEIVE COMMAND ~ BA/CC IN ADDRESS IS NXM 
3* SUBTEST 3 ~ JA/CC IN TRANSMIT COMMAND =~ BA/CC IN ADDRESS IS NXM 
-* 
ertititii titi 


"Sige amacmaaaacamnag e-em in 
: TEST 10 = DMR-11 

ie TIME OUT = FORCE A TIMEOUT AND VERIFY THAT THE ERROR IS REPORTED. 

3* THIS ig! WILL ALSO USE AN APPROXIMATE TIMER TO DETERMINE IF THE 

= M8207 1 MSEC. PROGRAM TIMER IS OUT OF RANGE. 


Re ee 


SSSSSSg3 898939838 


1 

oe LLL LL hl dled lb dallalabelelelabelabelabeiaieiaiabiabslabeiaieiaielel 

1008 se TEST 11 = DMR-11 

1009 7* MESSAGE TOO LONG ~ TRANSMIT A MESSAGE THAT IS TOO LONG FOR THE 

iene :* RECEIVE BUFFER AND VERIFY THAT THE ‘TOO LONG’’ ERROR IS RECEIVED. 
+ 

1012 PARR EERE R ARATE RRA 

1013 
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1074 
1015 SR RR RR BAe A A A I RR ITT TOTO TC TOTTORI TE 
1016 3* TEST 12 = DMR-11 
1017 ;* PROCEDURE ERRORS = 
1018 :* THE FOLLOWING SHOULD CAUSE THE DMR=-11 TO HALT AND RESPOND WITH 
1019 3* A PROCEDURE ERROR: 
1020 7* SUBTEST 1 = A SECOND BASE IN COM'AND 
1021 ;* SUBTEST - A CONTROL IN BEFORE A BASE IN 
1022 3;* SUBTEST - A BA/CC IN BEFORE A BASE IN 
1023 :* SUBTEST 4 = A BA/CC IN RCV WITH A BUFFER LENGTH OF 0 
Ose :* SUBTEST 5 = A BA/CC IN XMIT. WITH A BUFFER LENGTH OF 0 
** 
1026 estiiiiitiitititititiiiiitiiiiiiiiiiiiiiiiiiiitiiitititiiii titi, 
1027 
1028 
1029 
1030 
1031 epee Wg apes ine depict a eng. 
1032 Z TEST 13 = DMR-11 
1033 Se FREE RUNNING FLAG MODE DATA TEST 
1034 ;* TRANSMIT A MESSAGE AND VERIFY THE RECEIVED DATA IS CORRECT. 
1035 ;* IN THIS TEST NO INTERRUPTS ARE USED AND THE LINE UNIT IS IN 
1036 3* yy (TTL) LOOPBACK. THIS TEST IS THE FIRST TEST IN WHICH 
1037 ;* THE DMR IS USED IN A DATA TRANSMISSION MODE. 
1038 RII IOI IIIIIOIOISISIIOII IOI IICIOIUIIIUIIIOI III IOI IOI IO TR RIOR 
1039 
1040 
1041 
1042 
1043 en toe ae ae meme ae eee eae 
1044 ; TEST 14 = DMR-11 
1045 ie IN ag be TEST - SEE IF WE HAVE MEMORY MANAGEMENT, IF SO SEE IF WE 
1046 3* HAVE THE MEMORY TO CHECK BITS 16 & 17 IN SEL6. THIS WILL ALLOW 
1047 ;* US TO TRANSFER DATA USING THOSE EXTENDED ADDRESSING BITS. AS IN 
1048 :* TEST 13 THE TEST IS NON-INTERRUPT AND INTERNAL (TTL) LOOPBACK IS 
s'est :* USED. 
1051  ondhennnesenehnnnaigneiecanmennneneremnnanennetetenTenmesetetnen 
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ONC mnDe TEST 15 = DMR-11 
IN THIS TEST THE DMR WILL TRANSMIT AND RECEIVE 7 BUFFERS. 


ALL BA/CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND 
THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST 
THE RECEIVE/TRANSMIT TABLE. 


cc BUFFERS ARE DETERMINED IN THE SUBROUTINE SBUFFS. THIS 


'* 
n 
a 
* 
* 
* 
oe 
* 
* SEVEN RECEIVE AND SEVEN TRANSMIT BUFFERS. THE ROUTINE WILL 
. ATTEMPT TO USE AS LARGE BUFFERS AS POSSTGLE IN THE FOLLOWING 
7 

. A; If THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32k. 
: B. IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER 
. THAN 2K BYTES, USE THAT MEMORY 

* c. IF NEITHER OF THe PRECEEDING TWO ARE POSSIBLE, USE 

. THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC 

& 

** 


(PPR RSRERSSLESALASESASAASASES SES ALAS ERR RSAR AAAS ALLS RS ALAR AAAS ASS ASS S| 
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1077 
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TEST 16 = DMR-11 
MODE 


UME BASE _IN = 
THIS TEST THE DMR WILL TRANSMIT AND RECEIVE 7 BUFFERS. DURING THE 
ST THE DMR tN BE HALTED AND RESTARTED BY A BASE=IN RESUME IN THE 


CONTROL IN 

HALT MASTER CLEAR BASE IN RESUME 
2 BA/CC IN RECEIVE 

HALT MASTER CLEAR BASE IN RESUME 
2 BA/CC IN RECEIVE 

HALT MASTER CLEAR BASE IN RESUME 
2 BA/CC IN RECEIVE 

HALT MASTER CLEAR BASE IN RESUME 
1 BA/CC IN RECEIVE 
HAL MASTER CLEAR BASE IN RESUME 
2 BA/CC IN TRANSMIT 

HALT MASTER CLEAR BASE IN RESUME 
2 BA/CC IN TRANSMIT 

HALT MASTER CLEAR BASE IN RESUME 
2 BA/CC IN TRANSMIT 

HALT MASTER CLEAR BASE IN RESUME 
1 BA/CC TRANSMIT 

HALT MASTER CLEAR BASE IN RESUME 


ALL BA/CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND 
THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST 
THE RECEIVE/TRANSMIT TABLE. 


THE BUFFERS ARE DETERMINED IN THE SUBROUTINE SBUFFS. THIS 

SUBROUT INE eB DETERMINE THE ADDRESS AND CHARACTER COUNT OF 
SEVEN RECEIVE AND SEVEN TRANSMIT BUFFERS. THE ROUTINE WILL 
wh nalh TO USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING 


HIE : 
A IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32k. 
8. v THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER 
HAN 2K BYTES, USE THAT MEMORY 
C. IF F NEITHER OF THE PRECEEDING TWO ARE POSSIBLE. USE 
THE 2k BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC. 


THIS TEST RUNS IN INTERNAL TTL ONLY 


loon 
2 


REE AERAAEEAAERAAEAAREREARAEERAEEEREEREEEEE 
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23 
3 
a 


Pl 


D 
22 
23 ot eee ae Ree oon enone et ok ae eee 
24 ; TEST 17 = DMR-11 
25 fe INTERRUPT DRIVEN EXERCISE 
$8 ve IN THIS TEST 64 BUFFERS WILL BE TRANSMITTED AND RECEIVED 
28 ie ALL BA/CC OUTS pst AND TRANSMI7S WILL BE ACCOUNTED FOR AND 
29 3;* THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST 
eo 3* THE RECEIVE/TRANSMIT TABLE. 
32 
32 :* THE BUFFERS ARE DETERMINED IN THE SUBROUTINE SBUFFS. THIS 
33 3* SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF 
34 3* 64 RECEIVE AND 64 TRANSMIT BUFFERS. THE ROUTINE WILL 
35 3* ATTEMPT TO USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING 
36 5* HIERARCHY: 
37 3* A. IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32k. 
38 :* B. IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER 
9 3* THAN 2K BYTES, USE THAT MEMORY 
0 3* C. IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE 
3 se THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC. 
°® 
3 OTTIST IIIT TIT Titi tii titi tii titi ii iiiiiiiitititiiiiiiiiiiiiiiiiis, 
4 
5 
6 


SERS EW 


Wee ti Titi iii titi iit it iti titi ii iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii iy) 
* TEST 18 = DMR-11 

;* LARGE MESSAGE 

;* IN THIS MODE TRANSMIT AND RECEIVE 1 LARGE BUFFER 


;* THE BA/CC OUT RECEIVE AND TRANSMIT WILL BE ACCOUNTED FOR AND 
;* THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST 
;* THE RECEIVE/TRANSMIT TABLE. 


ee kk hh ath oh oh th oh oh oh th OS a I SS as I 
ee ek ek ek a kk dk oh td tt 1 st I 1 I 


47 2 

48 : 

49 = 

50 7* 

51 3 

52 j 

: : 
3* 

55 :* THE BUFFERS ARE DETERMINED IN THE SUBROUTINE SBUFFS. THIS 

56 3* SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF 

57 :* ONE RECEIVE AND ONE TRANSMIT BUFFER. THE ROUTINE WILL 

4 :* ht oe, TO USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING 
** 

60 3* os IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32k. 

61 :* B. IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR G?EATER 

62 3* THAN 2K BYTES, USE THAT MEMORY 

63 3* C. IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE. USE 

43 3° THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC. 
** 

66 PITTI IIIT Titi TTT ti titi i titi tiiiiiitiiiiiiiiiiiiiiiiiiiiiiiiiieiiiit) 

67 
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er eT ee ne eee ee 
1170 : TEST 19 = DMR-11 
aya - MAINTENANCE MODE OPERATION 
1173 . THE BA/CC OUT RECEIVE AND TRANSMIT WILL BE ACCOUNTED FOR AND 
1174 :* THE CHARACTER COUNTS AND @UFFER ADDRESSES WILL BE CHECKED AGAINST 
a 3* THE RECEIVE/TRANSMIT TABLE. 
% 
1177 :* THE BUFFERS ARE DETERMINED IN THE SUBROUTINE SBUFFS. THIS 
1178 hed SUBROUTINE WILL DETERMINE THE ADDRESS AND Se neu COUNT OF 
79 s@ ONE RECEIVE AND ONE TRANSMIT BUFFER. THE ROUTINE WILL 
ey se th TO USE AS LARGE BUFFERS AS POSSIBLE oN THE FOLLOWING 
te 
82 s* A; IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32k. 
83 ;* B. 4 THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER 
84 s@ HAN 2K BYTES, USE THAT MEMORY 
85 :* C. IF F NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE 
oS se THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC. 
** 
PARRA ERR ERR AREER REA E RAAT 


9.0 ERROR INFORMATION 


Y.1 ERROR REPORTING 


ERRORS ARE REPORTED BY THE PROGRAM AS THEY OCCUR (IF NOT 
INHIBITED). THE REPORT CONFORMS TO THE DIAGNOSTIC SUPERVISOR 
ERROR REPORT FORMAT, AND CONSISTS OF A DESCRIPTION OF THE 
ERROR, THE TEST NUMBER, SUBTEST NUMBER, PC OF THE ERROR 
Fer heat ee ADDRESS, AND BASIC AND EXTENDED ERROR 


THE FOLLOWING EXAMPLE PROVIDES A TYPICAL ERROR REPORT, WHICH 
DESCRIBES AN ans NOT SET'' ERROR, AND PROVIDES THE PC OF 


re er ere ee ee eee eee ee ee 


ek ek td td td 28 ot a Sh Sa ss 
SSLRGRANLSSE 


S838 


1204 THE ERROR CALL AND THE PC OF THE CALL TO THE SUBROUTINE 
1205 REPORTING IT, THE FAILING REGISTER NAME, AND DEVICE REGISTER 
i CONTENTS : 

ie oo ~~ FTL ERR 00002 ON UNIT 00 TST 006 SUB 000 PC: 016210 
1210 ERROR IN SUBROUTINE CALLED AT PC: 036174 

1211 BUFFER STATUS 

1212 dj FE 

1213 BUFFER SIZE: 2048 

1214 IN = RCV ASSIGNED: 7 XMIT ASSIGNED: 7 

1215 OUT = RCV RETURNED: 0 XMIT RETURNED: 0 

1216 DMR RUN ACKNOWLEDGE NOT RC 

isl) (CHECK INTERFACE, BAUD AND TURNAROUND) 

1219 ALL_THE MESSAGES IN THE DIAGNOSTIC USE BASIC ve sseee CALLS. 
1220 THEREFORE THE INHIBIT EXTENDED ERROR FLAG WILL 


HAVE NO 
EFFECT ON THE MESSAGE OUTPUT. THE INHIBIT BASIC MESSAGES WILL 
serene THE ERROR MESSAGES. 


SEQ 0026 
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1224 00200C 


MPN 
—OO0ONO 


002000 


WWWW 


2 
3 002000 


000001 


MNMNNM PPP fPonofnrvrnrvonrw 


ee a ee ee ed ed was gg od = = = 
BSRIRAK 


242 000001 


ison 002000 


.=2000 


-MCALL SVC 
SVC ; INITIALIZE SUPERVISOR MACROS 


BGNMOD 

$LSTIN= 1 ; LIST INSTRUCTIONS 

$LSTTAG= 1 

SVCINS= 1 ; LIST INSTRUCTIONS, SHIFTED _ 
SVCTST= 1 : LIST TEST TAGS, SHIFTED RIGHT 
SVCSUB= 1 > LIST SUBTEST TAGS, SHIFTED RIGHT 
SVCGBL= 1 : LIST GLOBAL TAGS, SHIFTED RIGHT 
SVCTAG= 1 ; LIST OTHER TAGS, SHIFTED RIGHT 


CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF i WISH 
TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 
SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS. YOU MAY 
CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 


POINTER BGNSW,BGNDU ,BGNSF T 
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\c2e -SBTTL PROGRAM HEADER 

j++ 
1256 : THE PROGRAM HEADER MACRO CHARACTERIZES THIS DIAGNOSTIC. THE 
1257 ; HEADER MACRO'S ARGUMENTS ARE FILE NAME, RELEASE LOVE PATCH 
1258 3 DISPOSITION OF THE MOST RECENT PAiCH, MAXIMUM TEST TIME IN SEC. 
1259 ; AND THE TYPE OF DIAGNOSTIC (O-SEQUENTIAL, 1-EXERCISER). THESE 
iset ; ARGUMENTS ARE IN RESPECTIVE ORDER. 
1262 
1263 
1264 002000 HEADER CZDMI,D.0,600..,0 
1265 002000 LSNAME : : 
1266 002000 103 ASCII /C/ 
1267 002001 132 ASCII /Z/ 
1268 002902 104 -ASCII /D/ 
1269 002003 115 ASCII /M/ 
1270 002004 111 ASCII /I/ 
1271 002005 000 BYTE 
1272 2006 000 -BYTE O 
1273 0C2007 -BYTE 0O 
1274 002010 LSREV:: 
1275 002010 104 -ASCII /D/ 
1276 002011 LSDEPO: : 
1277 002011 060 -ASCII /0/ 
1278 002012 LSUNIT:: 
1279 002012 000000 -WORD 0 
1280 002014 LSTIML:: 
1281 002014 001130 -WORD 600. 
1282 002016 LSHPCP:: 
1283 002016 036744 .- WORD LSHARD 
1284 002020 LSSPCP:: 
1285 002020 037700 -WORD LS$SOFT 
1286 002022 LSHPTP:: 
1287 002022 002174 -WORD LS$HW 
1288 002024 LSSPTP:: 
1289 002024 002224 -WORD L$SW 
1290 002026 LSLADP: : 
1291 002026 040100 -WORD LS$LAST 
1 002030 LSSTA:: 
1293 002030 000000 -WORD 0O 
1294 002032 L$CO:: 
1295 002032 000000 -WORD 0O 
1296 002034 LSDTYP:: 
1297 002034 000000 -WORD 0O 
1298 002036 LSAPT:: 
1299 002036 000000 -WORD 0O 
1300 002040 LSDTP:: 
1301 002040 002124 . WORD LSDISPATCH 
1302 002042 LSPRIO:: 
1303 002042 000000 «WORD 0 
1304 002044 LSENVI:: 
1305 002044 000000 «WORD 0 
1306 002046 LSEXP1:: 
1307 002046 000000 -WORD 0O 
1308 002050 LSMREV:: 
1309 002050 003 -BYTE CS$REVISION 





————_—— 


D 3 
CZDMIDO DMR=-11 ete og ® TESTS MACY11 30A(1052) 29-JUL-81 12:42 PAGE 30 SEQ 0029 
CZDMID.P11 29=JUL-81 11:32 PROGRAM HEADER 
1310 002051 002 -BYTE C$EDIT 
1311 002052 LSEF:: 
1312 002052 000000 -WORD 0 
1313 002054 000000 -WORD 0 
1314 002056 L$SPC:: 
1315 002056 000000 -WORD 0 
1316 002060 LSDEVP:: 
1317 002060 010240 -WORD LS$DVTYP 
1318 002062 LSREPP: : 
1319 002062 000000 «WORD 0O 
1320 002064 LSEXP4:: 
1321 002064 000000 -WORD 0O 
1322 002066 LSEXP5:: 
1323 002066 000000 -WORD 0 
1324 002070 LSAUT:: 
1325 002070 000000 -WORD 0 
1326 002072 LS$DUT:: 
1327 002072 023640 -WORD L$DU 
1328 002074 L$LUN:: 
1329 (02074 000000 -WORD 0O 
1330 002076 LSDESP:: 
1331 002076 010246 .~WORD LSDESC 
1332 002100 LSLOAD: : 
1333 002100 104035 EMT ESLOAD 
1334 002102 LSETP:: 
1335 002102 000000 -WORD 0 
1336 002104 LSICP:: 
1337 002104 020452 -WORD LS$INIT 
338 002106 LSCCP:: 
339 002106 022046 -WORD LSCLEAN 
002110 L$ACP:: 
002110 021756 ~WORD LSAUTO 
002112 L$PRT:: 
002112 020444 -WORD L$PROT 
002114 LSTEST:: 
002114 000000 -WORD 0 
002116 LSDLY:: 
002116 000000 -WORD 0 
002120 LSHIME:: 
002120 000000 «WORD 0 


1 
, 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


RRAAAAAAAAAAR ERE RRER EE 
FS ODNAUEWNM —$OOONAUSWN—OO 
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-SBTTL DISPATCH TABLE 


ea 
wre 


WLAN 
SSB 
3s 
RN 
NZ 
Oo 
lw 
Oo 
o 
MN 
oO 
= 
zD 
Lo] 
=" 
—_ 
Co 


036670 -WORD 119 


1 

1 

1364 BU 
1365 37 THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 

1366 3/7 IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 

a4 SSTIIILIIITTAIATAA ATTA TTA ATTA AAT AT ATTA 
1369 002122 DISPATCH 19 

1370 002122 000023 -WORD 19 
1371 002124 L$DISPATCH: : 

1372 002124 023720 «WORD 11 
1373 002126 024230 «WORD T2 
1374 002130 025544 «WORD 13 
1375 002132 025676 WORD 14 
1376 002134 026724 WORD 15 
1377 002136 030136 «WORD 16 
1378 002140 030716 WORD 17 
1379 002142 031340 WORD 18 
1380 002144 032042 WORD 19 
1381 002146 032554 «WORD 110 
1382 002150 033000 «WORD 111 
1383 002152 033160 WORD T12 
1384 002154 034064 WORD 113 
1385 002156 034614 «WORD 114 
1386 002160 036360 «WORD 115 
1387 002162 036462 «WORD 116 
‘to 036550 «WORD 117 
; 

1 

1 

1 

; 

1 

1 
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CZDMID.P11 29-JUL-81 11:32 DEFAULT HARDWARE P=-TABLE 
p44 -SBTTL DEFAULT HARDWARE P=-TABLE 
1399 STIITITTITITTITAAT TATA TT AT ATTA AAAI ATTA AAAS AAT 
1400 af THE DEFAULT HARDWARE P=TABLE CONTAINS DEFAULT VALUES OF 
1401 Gat Rig my ti PARAMETERS. **NOTE = MANY OF THE P=TABLE VALUES LISTED 
1402 Ow ARE NOT USED IN THIS DIAGNOSTIC BUT ARE INCLUDED TO AGREE WITH 
1403 . mBDO? & M8203 DIAGNOSTIC P=TABLES. 
peo: SAIITIITITAATTADIAIAATTTTATADAAAT ATTA 
1406 002172 BGNHW DFPTBL 
1407 002172 000013 -WORD L10000-1 $HW/2 
1408 002174 L$HW: : 
1240 002174 DFPTBL:: 
1411 002174 000000 . WORD 0 ;**NOT USED - MICROPROCESSOR TYPE 
1412 002176 160170 -WORD 160170 ;DMR11 CSR UNIBUS ADDRESS DEFAULT 
1413 002200 000300 .» WORD 300 :DMR11 INTERRUPT VECTOR DEFAULT 
1414 002202 000000 . WORD 0 ;**NOT USED - ag Maes 
1415 002204 000000 WORD 0 3**NOT USED = LINE UN 
1416 002206 000000 . WORD 000 :**NOT USED = SWITCH PACK #1 (REG 11) 
1417 002210 000000 IRD 000 :**NOT USED - SWITCH PACK #2 (REG 15) 
1418 002212 000000 . wURD 000 s**NOT USED = SWITCH PACK #3 (REG 16) 
. WORD 5 ; CABLE TURNAROUND (DEFAULT = CABLE(5)) 
. WORD 0 ;**NOT USED = BAUD RATE 
. WORD 0 :**NOT USED - RUN SWITCH 
ENDHW 


L10000: 
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CZDMID.P11 29=JUL-81 11:32 DEFAULT SOFTWARE P=TABLE 
ees .SBTTL DEFAULT SOFTWARE P=-TABLE 
1433 SASIIITISTTATTII TIAA IATA TATA ATA T AAT 
1434 37 THE SOFTWARE P-TABLE CONTAINS THE VALUE OF THE PROGRAM 
1435 :/ PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR. 
ts) SALIIITITITITITTTALTATATTATAAT ATTA TATA TATA 
1438 002222 BGNSW SFPTBL 
1439 002222 000001 «WORD 1L10001=L$Sw/2 
1aa3 002224 SFPTBL:: 
1443 002224 000005 SPEED: .WORD 5 ;PROCESSOR SPEED VARIABLE USED 
1444 TO ALTER THE WAIT VARIABLES. 
1445 002226 ENDSW 


1446 002226 10001: 





a ee eee 
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CZDMID.P11 29-JUL=81 11:32 GLOBAL EQUATES SECTION 
126 -SBTTL GLOBAL EQUATES SECTION 
1454 STIIIIIIAITTATAITIT ITAA IATA TAAL AAA AAA 
1455 :/ THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
1456 sf ARE USED IN MORE THAN ONE TEST. 
vet STITT ITIIIAIAT TATA AAT TATA AAA ATA AAA ALATA EAA ASS 
1459 002226 EQUALS 
1460 3 
1461 ; BIT DIFINITIONS 
1462 : 
1463 100000 B1T15== 100000 
1464 040000 B1T14== 40000 
1465 020000 BIT13== 20000 
010000 BIT12== 10000 
1467 04000 BIT11== 4000 
1468 002000 BIT10== 2000 
1469 001000 BITO9== 1000 
1470 000400 BITO8== 400 
1471 200 BITO7== 200 
1472 000100 B1T06== 100 
1473 040 BITO5== 40 
1474 000020 BIT04== 20 
1475 000010 BITO3== 10 
1476 000004 BITO2== 4 
1477 000002 BITO1== 2 
1478 000001 BITOO== 1 
1479 ; 
1480 001000 BIT9== BITO9 
B1;8== BITO8 
BIT7== BITO7 
BIT6== BITO6 
BIT5== BITOS 
BIT4== BITO4 
BIT3== BITO3 
BIT2== BITO2 
BIT1== BITO1 
BITO== BITOO 


> EVENT FLAG DEFINITIONS 
+  EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 


EF .START== 32. : START COMMAND WAS ISSUED 


. Sl 
EF.CONTINUE== 30. : CONTINUE COMMAND WAS ISSUED 
EF .NEW== 29. ; A NEW PASS HAS BEEN STARTED 
EF .PWR== 28. ; A POWER-FAIL/POWER-UP OCCURRED 


S PRIORITY LEVEL DEFINITIONS 
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C2DMID.P11 — 29=JUL=81 11:32 OBAL EQUATES SECTION 
1508 00010 PRIO2== 100 
1509 000040 PRIOI== 40 
1510 000000 PRIOO== 
1512 OPERATOR FLAG BITS 
1514 000004 EVL== 
1515 000010 LOT== 10 
1516 20 ADR== 20 
1517 000040 IDU== 40 
1518 000100 ISR== 100 
1519 200 UAM== 200 
1520 BOE== 0 
1521 001000 PNT== 1000 
1522 002000 PRI== 2000 
1523, 000 IXE== 4000 
1524 010000 IBE== 10000 
1525 020000 IER== 20000 
1526 0000 LOE== 40000 
1527 100000 HOE== 100000 
1528 FRA REE EERE EERE ERE REED (ARR RAASASAARASSSRRAAR ASA SS SS SG 
1529 
126° Py P2ARSASAASLALALALAZALSAAAAASAASRARSASRESLSESRARRRRRRSRRRRAASRARARRARASRERSRARARR RASA SASS SD | 
1951 SWITCH REGISTER OPTIONS 
1533 100000 sw15= 100000 
1534 0000 Sw14= 40000 
1535 020000 SW13= 20000 
1536 010000 Swi2= 10000 
1537 000 Swil= 4000 
1538 002000 Sw10= 2000 
1539 001000 SwO9= 1000 
1540 SWwO8= 400 
1541 000200 SwO7= 200 
1542 000100 SwO6= 100 
1543 000040 SWO5= 
1544 000020 SWO4= 20 
1545 000010 SwO3= 10 
1546 000004 SWO2= 4 
1547 000002 SwOl= 2 
1548 000001 SwOO= 1 
1550 J EAR EEE REE KEE EERE EERE EERE EKER REE EERE EE 
1551 ZCSR AND STAUS WORD DEFINITIONS 
1552 SELO (CSR) - BSELO/BSEL 
1553 100000 hins “61115 SET IF RUNNING 
1554 040000 MCLR= BIT14 MASTER CLEAR OF PROCESSOR AND LINE UNIT 
1555 020000 MDIAG= 81113 [CSR MAINTENANCE = ENABLE MICRODIAGNOSTICS 
1556 010000 STLU=  BITI2 :CSR MAINTENANCE - STEP LINE UNIT 
004000 :CSR MAINTENANCE = LINE UNIT LOOP 


CSR MAINTENANCE 

:CSR MAINTENANCE 

:CSR MAINTENANCE - USED WITH LOOP L 

;WHEN ASSERTED, XMITTER SHIFTS; CLEAR, REC. SHIFTS 
:CSR - DMR11 READY RESPONS 

CSR - INTERRUPT ENABLE INPUT ~ DMR11 INTERRUPTS 





J. 5 
CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052) 29=JUL=81 12:42 PAGE 36 SEQ 0035 


CZDMID.P11 29=JUL=81 11:32 GLOBAL EQUATES SECTION 

1564 CPU WHEN RDI SET IN RESPONSE TO RQI BEING SET. 
1565 000040 RQI= BITS :CSR = REQUEST IN 
1566 000020 IECLR= BITS 3CSR = INTERRUPT ENABLE INPUT = DMR11 INTERRUPTS 
1567 CPU WHEN RDI CLEARS IN RESPONSE TO RQI BEING CLEAR. 
1568 7 (DMR RUN MODE ONLY) 
1368 000004 RCV= BIT2 :CSR - IF 0, TRANSMIT & IF 1, RECEIVE 
1571 3:SEL2 - BSEL2/BSEL3 
1572 000200 RDO= BIT ;SEL2 = DMR11 SETS TO INDICATE DATA READY FOR OUTPUT 
13f3 000100 IEO= girs :SEL2 - SET TO ENABLE DMR11 TO INTERRUPT WHEN RDO 
1575 :SEL6 - BSEL6/BSEL7 
1576 020000 BASEUP= BIT13 7SEL6 = CONTROL OUT = RESPONSE TO DMR MODE BASE 
1577 ; TABLE UPDATE COMMAND. 
1578 010000 RES= BIT12 7SEL6 = BASE IN == WHEN SET CAUSES 
1579 ; RESUMPTION OF OPERATION 
1580 010000 CTS= BIT12 7SEL6 = CONTROL OUT = CTS FAILED 
1581 004000 SECN=  BIT11 :SEL6 = CONTROL IN <= START TIME (3 SEC IF SET 
1582 ; 1 SEC IF CLEAR) 
1583 002000 HDX= BIT10 7SEL6 = HALF-DUPLEX & CLEAR FOR FULL=DUPLEX 
1584 002000 CD= BIT10 7SEL6 = CONTROL OUT = CD GLITCHED 
1585 001000 HALTC= BIT9 :SEL6 - EXTENDED CONTROL OUT - HALT COMPLETED 
1586 000400 MAINT= BIT8 :SEL6 = DDCMP MAINTENANCE DURING CONTROL IN 
1587 000522 DMR= BIT8!122 ;SEL6 - BASE IN == SET FOR DMR11 MODE 
1588 3 122 IS ne oo PASSWORD FOR BSEL6 AND 
1589 3 B1T8 SETS THE DMR MODE BIT IN BSEL7 
1590 000400 NXM= BIT8 3;SEL6 = CONTROL Sur - NON EXISTENT MEMORY 
1591 000200 STREC= BIT7 7SEL6 = CONTROL OUT = START RECEIVED 
1592 000100 DISCON= BIT6 :SEL6 - CONTROL OUT = DISCONNECT 
1593 000100 DTR= BIT6 ;SEL6 - MODEM WRITE - DATA TERMINAL READY 

0 0 DMRRUN= BITS 3;SEL6 = CONTROL OUT - DMR RUN MODE 
1595 000020 TOLONG= BIT4 :SEL6 = CONTROL OUT - MESSAGE TOO LONG 
1596 0 MAINT1= BIT3 [SEL6 - MODEM WRITE - LOCAL MODEM LOOPBACK 
1597 000010 MNTREC= BIT3 :SEL6 = CONTROL OUT - MAINTENANCE MSG. RECEIVED 
1598 NOBFR= BIT2 3SEL6 - CONTROL OUT - NO BUFFER 

0 MAINT2= BIT2 :SEL6 - MODEM WRITE - REMOTE MODEM LOOPBACK 
1600 000002 TOUT= BIT1 :SEL6 = CONTROL OUT - TI T 
74 000001 NAKS= BITO *SEL6 = CONTROL OUT = NAKS THRESHOLD EXCEEDED 
1603 
1604 TAREE EEE ERE EEE EERE KEKE EEE ER EEKEAREKEEEE EERE ERE 
bee ;zDDCMP COMMANDS - BITS 0 & 1 IN SELO AnD SEL2 
1607 : INPUT (SELO) 
1608 000000 BACCT= 0 BUF ADDRESS AND CHARACTER COUNT TRANSMIT 
1609 000001 CNTRL= 1 :CONTROL COMMAND (IN OR OUT) 
1610 000002 HL T= 2 HALT COMMAND 
1611 000003 BASEI= 3 ;BASE IN COMMAND 
1612 000004 BACCR= 4 :BUF ADDRESS AND CHARACTER COUNT RECEIVE 
1613 000005 WMODEM= 5 sWRITE MODEM STATUS REGISTER 
1614 EXERR= 6 ENABLE EXTENDED ERROR NOTIFICATION 
1615 000007 DXERR= 7 [DISABLE EXTENDED ERROR NOTIFICATION 
1616 000010 DDMC= 10 sDESELECT DMC LINE MODE 
1617 000011 UPDATE= 11 REQUEST BASE TABLE UPDATE 
1618 000012 TIMER= 12 SET REP/SELECT TI - 
1619 000013 THRESH= 13 SET THE FOLLOWING SRE SHOE DS: 
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1620 sNAKS RECVD 

1621 ;NAKS SENT 

1622 one ee teR 

1623 NO BUFFE 

1624 000014 RRAM= 14 ; READ mB207 RAM (0-377) 

1625 000015 INTER= 15 SWRITE INTERFACE IN AX3-15 

1oce 000017 RMODEM= 17 ;READ MODEM STATUS (=NOP) 

1628 OUTPUT (SEL2) NOTE : CNTR IS USED FOR SEL2 

ioe) 000007 CMD= 7 ; ** MASK USED TO CLEAR COMMAND BITS 0-2 * 

1631 FF REE KKK ERE EEK EK EEK KEKE KEKE EEEKKEKKEEEREKEKEKKREEKEEKRE EEK 

1632 ; BASE TABLE OFFSETS 

1633 s;NOTE: THE OFFSETS FOR BASE+3.-BASE+10 WERE 

1634 sy ar ane NOT LABELLED, BECAUSE THOSE LOCATIONS 

1635 T BE CHANGED IN ORDER TO BE DMC COMPATIBLE. 

1636 ‘THE "ABELS BELOW CORRESPOND WITH THOSE USED IN THE 

1637 ;DMR MICROCODE. 

1638 000042 = 42 ZAR = MESSAGE RECEIVED 

1639 000043 = 43 = MESSAGE TRANSMITTED 

1640 000044 = os aA ~ MESSAGE ACKNOWLEDGED 

1641 00004 = 45 AT - NEXT MESSAGE TO BE TRANSMITTED 

1642 000046 X= 46 :#X = LAST COMPLETED TRAN 

1643 000055 PRETIM= 55 PROGRAMMABLE REP/SEL TIMER VALUE. 

1644 000060 THIL= 60 ; THRESHOLD LEVEL = NAKS RECEIVED . 

1645 000062 TH2L= 62 ; THRESHOLD LEVEL - NAKS SENT. 

1646 0 TH3SL= 64 ; THRESHOLD LEVEL = REP SENT. 

1647 TH4L= 66 ; THRESHOLD LEVEL - NO BUFFER AVAILABLE. 

1648 000072 ISP7= 72 : IMAGE OF SCRATCH PAD 7 

4 000076 ISP13= 76 IMAGE OF SCRATCH PAD 13 

1651 FLARE EERE KEKE EERE EH 

1628 3. INSTRUCTION DEF INITIONS 

1654 000207 RETURN=207 RETURN FROM SUB. C= JSR PCJ 

is 

1657 SD AEE EEK EERE EEK EEEEEEKEKEEEREREEEERKEREEKEEEKEKEEREEEEREREEEEKEREE EE 

1638 : MISC. EQUATES 

1660 LLOOP= 6 ;LOCAL_ MODEM LOOPBACK 

1661 000007 RLOOP= 7 REMOTE MODEM LOOPBACK. 

1662 000015 CR= 15 ASCII CARRIAGE RETURN 

1663 000012 LF= 12 ASCII LINE FEED 
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1666 .SBTTL GLOBAL DATA SECTION 

1668 7 tale EB HE Eg AL EAN dg hk hh id Lh alata 
1669 :/ THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 

1670 3/ IN MORE THAN ONE TEST. 

ort SATITTITTTAAT ATTA ATTA TATA 
er 

lore ERR RRR REE EEE EERE EEK EH 

10% :DMR11 VECTOR AND REGISTER INDIRECT POINTERS 

1678 002226 000000 DMRVEC: .WOR 0 7DMR11 RECEIVER INTERRUPT VECTOR 

1679 230 000000 DMTVEC: .WORD 0 *DMR11 TRANSMITTER INT. VECTOR 

1 002232 000000 CSR: «WORD 0 POINTER TO DMR11 CONTROL STATUS REGISTER 

1681 234 000000 SEL2: .WORD 0 ‘POINTER TO DMR11 CONTROL OUT REGISTER (SEL 2) 
1 002236 000000 SEL4: WORD 0 [POINTER TO DMR11 PORT REGISTER (SEL 4) 

1683 002240 000000 SEL6: .WORD O ‘POINTER TO DMR11 PORT REGISTER (SEL 6) 

1 002232 SELO= CSR :CSR IS SELO 

1685 002232 BSELO= CSR LOW BYTE OF CSR 

1 002242 BSEL1 0 s:POINTER TO DMR11 CSR HIGH BYTE 

1687 002234 BSEL2= SEL2 ;LOW BYTE OF SEL2 

1688 002244 BSEL 4 0 :POINTER TO SEL2 HIGH BYTE 

1689 002236 BSEL4= SEL4 LOW BYTE OF SEL 

1690 002246 000000 BSEL5: .WORD 0 ‘POINTER TO sEL4 HIGH BYTE 

1691 002240 BSEL6= SEL6 LOW BYTE OF 

1698 002250 000000 BSEL7: .WORD 0 :POINTER TO SELE HIGH BYTE 

1694 FLEA EEE EERE EEE EERE EEEEREEER EERE 

yo : 0THER HARDWARE PARAMETERS 

1697 002252 000000 WTYPE: .WORD 0 MICROPROCESSOR TYPE 

1698 002254 000000 DMTURN: .WORD 0 iT AROUND TYPE (0-7) 

5 44 002256 000000 MICRO: .WORD 0 *MICRODIAGNOSTICS (IF 1(YES) = ENABLED) 

1701 J PERERA AEE REE REE EE EERE EEE EREEE KEE 

1S PROGRAM CONTROL PARAMETERS 

133 

1706 002260 000000 DMRFLG: .WORD 0 FLAG SET WHEN DMR MODE IS REQUESTED IN 

1707 [THE BASE IN C ED TO FLAG THAT 

1 ZA MODE ACKNOWLEDGE IS EX ED. 

1709 002262 000000 INFACE: .WORD 0 FLAG TO ALLOW CHANGE OF INTERFACE TYPE 

1710 BY WRITING AX3-15. FLAG SET/CLEARED IN INIT. 
1711 002264 000000 FRSTIM: .WORD 0 :FLAG=0 IF PROGRAM JUST LOADED 

1712 002266 000000 FRSPAS: .WORD 0 *FLAG=0 IF FIRST PASS AFTER 

im? 002270 000000 STARES: .WORD 0 SFLAG=0 IF 1ST TIME THRU SFTER's STA OR RES 
1715 FOLLOWING PARAMETERS ARE USED IN THE 

1716 : INTERRUPT TESTS (TESTS 15-19) 

1717 002272 000000 START: .WORD 0 [FLAG SET WHEN A CONTROL IN MA BEEN ISSUED. 
1718 002274 000000 RESUME: .WORD 0 [FLAG SET WHEN A BASE IN WITH RESUME DESIRED. 
1719 002276 000000 DMCMDE: .WORD 0 FLAG SET WHEN A BASE IN WITH DMC MODE DESIRED 
1720 2300 000000 MNTMDE: .WORD 0 sFLAG SET WHEN MAINTENANCE MODE IS DESIRED. 
1721 002302 000000 -WORD 0O 7FLAG RETURNED IN THE SUBROUTINE SBUFFS 
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ee ;MMANAG=1, MEMORY MANAGED BUFFERS USED 

1724 002304 000000 AX3: «WORD 0 ;BIT PATTERN TO WRITE INTO AX3-15, WHEN 

1725 :1T IS REQUESTED TO arr INTERFACE 

1726 ZSELECTION. (TEST F IGURATION 

1727 :BITO = TEST BIT (MUST BE SET TO ALLOW SELECT) 

1728 BITS = INTEGRAL MODEM 

1729 :BIT4 = V.35 

1730 :BIT6 = EIA 

1731 sBIT7 = RS422 

1732 002306 000000 WMAINT: .WORD 0 FLAG SET WHEN IT IS NECESSARY TO WRITE 

1733 SMODEM MAINTENANCE BITS (MAINTENANCE 1 & 2) 

1734 THIS FLAG IS SET OR CLEARED IN THE INIT CODE. 

1735 002310 000000 MANUF: .WORD 0 peewee MANUFACTURING USE ONLY **eee«® 

1736 ;THIS WORD MAY BE PATCHED TO A NON ZERO WHEN 

1737 MANUFACTURING SPECIAL TEST CONNECTORS ARE 

1738 sUSED. THIS WILL ALLOW MAINTENANCE BITS 

1739 :TO BE SET. 

1741 

1742 LER ERR EE EEE RERERERERRERERERERE EERE ER EEE 

1743 ;PROGRAM VARIABLES 

1744 ;WORD1-WORD3 VALUES DETERMINED IN INIT 

1745 ;CODE DEPENDING ON THE BAUD RATE. 

1746 002312 000000 WAIT1: .WORD 0 ;VALUE FOR TIMEOUT COUNTER 

1747 + ED IN $SWAIT SUBROUTINE 

1748 002314 000000 WAIT2: .WORD 0 a FOR TIMEOUT COUNTER USED IN $MSCLR 

1749 AND SCLRQI SUBROUTINES. 

1750 002316 000000 WAITS: .WORD 0 VALUE FOR TIMEOUT COUNTER USED IN $INOUT. 

1751 002320 000000 WAIT4: .WORD 0 ;WORD USED AS OUTER LOOP COUNTER IN $INOUT. 

1752 002322 000000 BUFSIZ: .WORD 0 :CALCULATED BUFFER SIZE IN BYTES. 

1753 002324 000000 : .WORD 0 34 OF RECEIVE & TRANSMIT BUFFERS. THIS 

1738 VARIABLE IS USED IN THE SUBROUTINE SBUFFS 

1756 002326 000000 INRCV: .WORD 0 :COUNTER FOR # OF BA/CC IN RECEIVES. 

1757 330 000000 INXMIT: .WORD 0 :COUNTER FOR # OF BA/CC IN TRANSMITS. 

1758 002332 000000 OUTRCV: .WORD 0Q :COUNTER FOR # OF BA/CC OUT RECEIVES. 

e+ 000000 OUTXMT: .WORD 0 ;COUNTER FOR # OF BA/CC OUT TRANSMITS. 

1761 SLR R ERA 

1762 :* MISCELLANEOUS STORAGE 

1763 002336 000000 TEMP1: .WORD 0 STORAGE FOR TURNAROUND TYPE 

1764 002340 000000 TEMP: .WORD 0 ZSCRATCH WORD USED FOR MISC. STORAGE IN ry 

1765 002342 000000 SAVE: .WORD 0 ZSCRATCH WORD USED FOR MISC. STORAGE IN S 
002344 000000 FLAG -WORD 0 SCRATCH WORD USED FOR MISC. os IN sue. 

1767 2346 000000 SFLAG: .WORD 0 ;FLAG USED IN TEST 15 FOR LOOP CONTROL. 

1768 002350 000000 SKIP -WORD 0 ZFLAG USED IN TEST 7 TO MARK WHETHER TO SKIP 

1769 3A PORTION OF THE TEST. 

Ha 002352 000000 NXMFLG: .WORD 0 FLAG USED TO MARK THAT THE DMR ADDRESS IS NXM 

1772 002354 000000 INFLAG: .WORD 0 FLAG USED IN INISR TO FLAG WHEN ALL THE 

Hh :BA/CC INS HAVE BEEN DONE. 

+r 002356 000000 OUTFLG: .WORD 0 Sate UBtns NAVE bee TO FLAG WHEN ALL THE 

1777 002360 000000 RESFLG: .WORD 0 [FLAG USED IN IN ISR TO FLAG THAT THE RESUME 
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1778 COMMAND HAS JUST BEEN ISSUED. 
1779 002362 000000 ERRFLG: .WORD 0 sFLAG USED IN THE WAIT SUBROUTINES ($WAIT 
17 ; & SCLRQI) TO RETURN ERROR CONDITON (SEC) 
1782 
1783 002364 000000 LAST: .WORD 0 ;WORD USED TO STORE LAST COMMAND PROCESSED IN 
1784 THE INPUT INTERRUPT ROUTINE. 
1785 002366 000000 ERROR: .WORD 0Q ZERROR STORAGE 
1786 002370 000000 LOGDEV: .WORD 0 SLOGICAL DEVICE ng J 
1787 002372 000000 PSTACK: .WORD 0 + CONTAINS BASE LEVEL PR 
1788 002374 000000 SUBRPC: .WORD 0 C OF S CALL FOR ERROR R T 
1789 002376 000000 NESTPC: .WORD 0 TFLAG TO NOTIFY WHEN A SUBR IS NESTED 
3 IN ANOTHER SUBROUTINE (WHEN SET) 
002400 000000 CLRNO: .WORD 0 : THIS WORD IS INCREMENTED DURING EACH MASTER 


:CLEAR. THIS WILL ALLOW EVERY OTHER MASTER 
:CLEAR TO RUN THE MICRO TESTS. 


ROM CHECK VARAIBLES 


3323 


002402 000000 LOCRC: .WORD QO CRC STORAGE FOR LOW BYTE CHIP 
002404 HICRC: .WORD 0 :CRC STORAGE FOR HIGH BYTE CHIP 
406 LOWORD: .WORD 0 : TEMP. WORD CONTAINING 2 CONSECUTIVE LOW BYTES 
002410 000000 HIWORD: .WORD 0 D CONTAINING 2 CONSECUTIVE HI BYTES 
002412 000000 ROMADR: .WORD 0 :POINTER TO ROM ADDRE 
002414 000000 CHIPNO: .WORD 0 CHIP NUMBER BEING CHECKED. 
000000 COUNT: —_ 0 [COUNTER USED IN THE $WAIT SUBROUTINE. 


SAAR EKER KEKE EEE EERE KERR EKER EKEEKEKEKEKEEKEEKKEEEEEEEKEEKEKER EE 
ITI TILITILELELELE LLL LLL LLL LLL L ELLE ELLE LLL ELLE LLL 


SIBUFFER AREA 
** CCITT PSUEDO-RANDOM TEST PATTERN ** 
THE FOLLOWING 32 WORDS TRANSLATE INTO A 512 BIT PATTERN 


SeSSaeaNcsseTeae 
8 


me el em kk dk I od 2d ad ot 


810 ; THAT WAS GENERATED ACCORDING TO CCITT RECOMMENDATION V.52. THIS 

811 ; PATTERN WAS GENERATED BY A 9 BIT SHIFT REGISTER CINITIAL IZED 

812 ; AS_1S) WHOSE 5TH AND 9TH BITS ARE XORED. THIS XOR RESULT IS A 
813 ; INTO THE 1ST BIT OF THE REGISTER AS THE REGISTER IS SHIFTED RI 

814 ; THE 9TH BIT (OR BIT SHIFTED OUT) IS SHIFTED INTO THE BIT PATTERN. 

815 ; NOTE: CCITT RECOMMENDED 511 BITS, I‘VE EXTENDED THIS BY 1 BIT TO END 
816 ; ON A WORD BOUNDARY. 

817 002420 S$CCITT: 

818 002420 177603 157427 031011 -WORD 177603,157427,031011 

819 002426 047321 163715 105221 “WORD 047321,163715, 105221 

820 143325 04004 i WORD  143325,142304,040041 

821 002442 014116 06 172334 -WORD 014116,052606,17¢334 

822 002450 105025 123754 111337 «WORD 105025,125754,111337 

1823 002456 111523 030030 145064 WORD 111523,030030, 145064 

1824 002464 137642 143531 063617 -WORD 137642,143531,063617 

1825 002472 135015 066730 026575 -WORD 135015,066730,026575 

1826 002500 052012 053627 070071 -WORD 052012,053627,070071 

1827 151172 165044 031605 -WORD 151172,165044,031605 

ace 166632 016741 -WORD 166632,016741 


FF EAA EEEAEEEERERAEARAAEA AERA EEEH EATER ES 


zz TRANSMIT BUFFER (SMALL) 
TFLAG: .WORD 0 FLAG FOR STATUS OF TRANSMIT BUFFER 


-— 
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1834 TCOUNT= 36. sCHARACTER COUNT OF TBUF 
1835 002522 041101 042103 043105 TBUF: .ASCIZ /ABCDEFGHIJKLMNOPORSTUVWXYZ0123456789/ 
1836 25 044107 045111 046113 
1837 25 047115 050117 051121 
1838 002544 052123 053125 054127 
1839 002552 055131 030460 031462 
1840 002560 032464 033466 034470 
1841 25 0 
1842 002570 ~EVEN 
ie 
1845 FERRARA REEEEER EERE REAR EERRAEAERAREARRAERRRRRAARERARAREAE REED 
i zs; RECEIVE BUFFER (SMALL) 
1848 002570 900000 RFLAG: .WORD 0 FLAG FOR STATUS OF RECEIVE BUFFER 
1849 000044 RCOUNT= 36. CHARACTER COUNT OF RBUF 
1850 002572 000046 RBUF: .BLKB 38. +36. BYTE BUFFER + 2 BYTES USED 
1851 ;TO MARK THE END OF THE RECEIVE BUFFER 
bh 2 . EVEN 
1854 J LRA EEE EEE EERE REEERER EERE EERE EEE EERER ARERR EREEEE EE 
ub 25 7; BASE TABLE 
td 002640 000400 BASE: .BLKB 256. sMICROPROCESSOR MEMORY ALLOCATION 
1859 SLEEK EEE EERE REE ERKEERERERREEEEEEEEEER EERE EEE 
189 32 TRANSMIT AND RECEIVE BUFFER POINTERS 
1862 003240 000200 XMTBUF: .BLKW 128. POINTERS TO TRANSMIT BUFFERS (UP TO 64) 
1863 31 WORD FOR ADDRESS AND 1 WORD FOR CHAR. COUNT 
134 003640 000200 RCVBUF: .BLKW 128. *POINTERS TO RECEIVE BUFFERS (UP TO 64). 
1866 CLERK RARER ERE EEE ERE KEE EERE EERE 
yor >; BUFFER AREA (LARGE) 
1869 004240 004000 BIGBUF: .BLKB 4000 sMAX BUFFER (2K BYTES) 
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ey -SBTTL GLOBAL TEXT SECTION 

1872 TT Gas Tit atTIn Catal feet GIO, 
1873 3% TEXT SECTION CONTAINS FORMAT STATEMENTS, 

1874 3% MESSAGES. * AND ASCII INFORMATION THAT ARE USED IN 

1875 3% MORE THAN ONE TEST. 

Ha} 4 5454454999555 49999 9994955949 9999 99999 999787887 T TTT eT TTT TTT TTT eT yey es 
fa WEeTTTT TTI Titi i titi ti tii tee i tii ies iii iii iii iii tiiiiiiiiiiiii titi 
1880 


PPO SBARBAAASZAAASAASASASZAAASLALALASLASLALSSERASSE SESE SERS ASS ARS SSR SARA RARER RAR ASA SESS SE S| 
010240 DEVTYP <DMR11> 

010240 LSDVTYP:: 

010240 046504 030522 000061 yo Oe /DMR11/ 


. NAMES OF DEVICES SUPPORTED BY PROGRAM 


SeRee See Re 


co 
2) 
— 
Oo 
— 
Oo 
i) 
‘> 
o 


—MARSASAALALA £££ AAR SE SRSESSLESERER ESAS SAAR RRRRAASERASAR SALA SALAS ASAAR ARAL ASSAD SD | 


<% TITLE OF PROGRAM 
STREAK ERE AEE ER REKRREE EERE EREE ERE EERE EERE ED 
010246 DESCRIPT <DMR=11 FUNCTIONAL TESTS> nae 
L 3 
1892 010246 046504 026522 030461 .ASCIZ /DMR=11 FUNCTION 


1895 010270 042524 052123 000123 
1896 - EVEN 


> FORMAT STATEMENTS USED IN PRINT CALLS 
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.SBTTL GLOBAL SUBROUTINES 
BU 
37 THE GLOBAL SUBROUTINES ARE CALLED BY MORE THAN ONE TEST 
SAASTIITIIITTTTIATALAT TATA AAT T TATA TATA TTA TTT LATTA ATTA 


QUEWNO 


SL RK KERR EERE REE REE EEE EERE EKER EEE EEE ED 


— a SS os SS ot et 
OODDOOOOOCO 
— So os et is I 


MACROS = THERE ARE 2 BASIC TYPES OF MACROS USED 
1. NORMAL MACROS - 


: 2. DMR11_ FUNCTIONAL MACROS = THESE MACROS MAY 
: BE NOTHING MORE THAN A CALL TO A SUBROUTINE, 


nN 
OuOOnN 


BUT THEY ARE DISTINCT DMR FUNCTIONS WHICH CAN 
DISTINGUISHED BY THE IN-LINE MACRO NAME. 


SL KEKE ERE KEE REE EERE ERE EKEEERKEKEEKEREER EK 


WER SaASSSAARASASSALASAAARALALAAASALALSALAA SAAR ARARR ASA S ASSES ARRAS SLADE SS 


% CALL MACRO = CALL ROUTINE = JSR PC, ROUTINE 
: (NOTE: RETURN IS EQUATED TO A RTS PC) 


FL RK REE 


-MACRO CALL ROUTIN 


“IF B, ROUTIN 

- ERROR ROUTINE: #4 MISSING ROUTINE-EXPANSION ABORT #4 
"ENDC 

JSR PC ,ROUTIN 

 ENDM 


FCRIII IIRC OIRO IOI IOI I RIOT OR TAS I AIA IAA IASI SISIS ISI SSISIISII SISA IAN SAA IAM. 
; WAIT $FLAG MACRO = THIS MACRO “tet e THE $FLAG AS RDI, RQI OR RDO. 
; IF RDI OR RDO, THE SUBROUTINE CALLED WILL WAIT UNTIL 
2 THE RESPECTIVE BIT IS SET. IF RQI, THE SUBROUTINE 
: CALLED WILL CLEAR RQI AND WAIT UNTIL RDI IS CLEARED. 


=MASRAALASLALALASL AAS ASARAASLASLAAASAALASASAASASARAASA SARA ASR ARR SSSR ASSL SE SSS & | 


ys | WAIT SFLAG 


“NLIST 

“LIST ME 

- = deal y**** MACRO EXPANSION ***® 

-ERROR FLAG  ;## MISSING FLAG FOR WAIT - EXPANSION ABORT ## 
“ENDC 

“IF IDN $FLAG,RQI 

JSR PC, $CLRQI :CLEAR RQ] AND WAIT FOR IT TO BE CLEARED. 
"IF IDN $FLAG,RDI 

JSR PC, $wAIT :CALL WAIT ROUTINE 

oi .WORD 0 ‘FLAG THAT WE'RE WAITING FOR RDI 

“IF IDN $FLAG,RDO 


JSR PC, $WAIT CALL WAIT ROUTINE 
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1965 WORD 1 zFLAG THAT WE‘RE WAITING FOR RDO 

1966 - ENDC 

1967 peake kkk 

1968 -NLIST ME 

1969 «ENDM 

1970 

1971 

1972 DDO IOI IDIDIIIIIIDIOIOIOISIOIIIOIOIIOISIOIUIUIOIUIUIOIUIOIOIOIOIUIOIIDIOIIOIIUIOIDIOIOIIOIIOIDIN IDES it 
1973 ; CLEAR MACRO = THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE 

1974 Z SMSCLR SUBROUTINE 

1975 DDRII IIIS IIIOIUIOIOIDIIOISIOISIIOIIOIOIOIIOIOIUIOIOIIOUIUIDIIUIOIUIOIUIOIOIDIOIIDINIOIOIOUIIO I Oi i ntt 
1976 «MACRO CLEAR 

1977 «NLIST 

1978 -LIST ME 

1979 «LIST 

1980 y**** MACRO EXPANSION **** 

1981 JSR PC, $MSCLR : ISSUE A DMR MASTER CLEAR 

1982 kk kk kee 

1983 -NLIST ME 

1984 ~ENDM 





prsienpteerwenniiteseeyinr eamieeomeeoseoninicnrantetn ea es Lee en 
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ISIS UII ISIIIIIIISIISIISIIISISIISIIIIIIIOIUIDIOIIOIUISIUIDIDIIIDIIDIDIOIDIDIUIIOIIO I ot tt 
” BASEIN MACRG = THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE 

: $BASEIN SUBROUTINE (WITH DEFAULT ARGUMENTS 

: IF ARGUMENTS NOT GIVEN) 


MARAAAAAAAAASAZLALALALARAARASLARAASARESRARARSRARAAS RRA RAR ARRAS ARES LASSE SD S| 


; .MACRO BASEIN $A,$8,$C 


;**** MACRO EXPANSION **** 


B $A 
JSR PC, $BASE! ;CALL BASE IN ROUTINE WITH DEFAULTS 
«WORD = LPLU SET LINE UNIT LOOP 
«WORD BASE ;BASE TABLE ADDRESS 
«WORD DMR ;DMR-11 MODE 


JSR PC, $BASEI CALL BASE IN ROUTINE 
-WORD $A MAINTENANCE MODE BITS TO SET IN BSEL1 
-WORD $B s;BASE TABLE ADDRESS 
«WORD $C :MODE 
- ENDC 
Rank xk 


-NLIST ME 
.ENDM 


—WERAREAASASLAALA£LA 2 222 SRRRARSASSA LER ESAS ARLA RRR RRR RR RRRSRASARARR RRR SRSA SS SG 


oe 


; CNTRIN MACRO = THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE 


; SCNTIN SUBROUTINE (WITH DEFAULT ARGUMENTS 
: IF ARGUMENTS NOT GIVEN) 
:- aaneieebbabialiindiaeoaeecenguesgebarmnieineniaannnnnaiiauninnntine 
.MACRO CNTRIN $A 
“NLIST 
LIST ME 
" “ * ys" MACRO EXPANSION **** 
JSR PC, $CNTIN :CALL CONTROL IN ROUTINE WITH DEFAULT 
ad .WORD 0 *SEL6 - FULL DUPLEX, RUN MODE, 7 SEC START. 
JSR PC, $CNTIN :CALL CONTROL IN ROUTINE 
.WORD $A 7SEL6 - (DUPLEX, MODE) 
.ENDC 
fueee rane 


-NLIST ME 
« ENDM 





-———— . 
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2035 J FARA ARERR ERE REE ERAREEEEKERREEEKEERE EERE EREREERER ERE EH 
2036 >" DMRIN MACRO = THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE 
2037 ; $DMRIN SUBROUTINE 
038 J LEAR REAR EEREERREEKAEKREE ARERR EEEKEEEEREREEEREAE EERE ER EEE 
.MACRO DMRIN  $A,$8,$C 
.NLIST 
.LIST ME 
.LIST 


se am jw MACRO EXPANSION **** 
“ERROR DMRIN; ## MISSING ARGUMENTS-EXPANSION ABORT #4 


ea 
JSR PC, $DMRIN :CALL DMR MODE INPUT ROUTINE 
.WORD $A > INPUT COMMAND 
IF B $8 
a .WORD 0 :NO SEL4 
pas .WORD $8 sSEL4 VALUE (OR BITS TO CLEAR IN BSEL6) 
LIF B $C 
so “WORD 0 ZNO SEL6 
palate .WORD $C :SEL6 VALUE (OR BITS TO SET IN BSEL6) 


Palalelie! KaKK 


-NLIST ME 
.ENDM 


FREER REE EEE EERE EER EEK EKER EE KEE ERE ERE 


> SHUTDN MACRO = THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE 
$HALT SUBROUTINE 


. 
CL REE EEEEEA EEE EERE EEE KERR ER EEE EEE EERE EERE REE 


-MACRO SHUTDN 


«NLIST 
~-LIST ME 
«LIST 
;**** MACRO EXPANSION **** 
JSR PC, $HALT :DMR HALT ROUTINE. 


Guana week 


-NLIST ME 
DM 





rc: Fe + ++ 
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| 
| ZDMID.P11 29=JUL=81 11:32 OBAL SUBROUTIN 
2081 LRA EEE EERE EEE ERE EERE EEE EATER EERE Ee 
: 2082 ; BACCIR MACRO = THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE 
2083 3 $BACC SUBROUTINE (WITH DEFAULT ARGUMENTS 
2084 ‘ IF ARGUMENTS NOT GIVEN) 
2085 PLETE EEE EEE RARER ERE REE ee 
-MACRO BACCIR $A,$8 
2087 «NLIST 
2088 -LIST ME 
2089 LIST 
2090 ;**** MACRO EXPANSION **** 
2091 sit B $A 
2092 JSR PC, $BACC ;CALL BA/CC IN ROUTINE WITH DEFAULTS 
2093 . WORD RQI'BACCR ;BA/CC IN RECEIVE COMMAND 
2094 -WORD RBUF ;RECEIVE BUFFER 
iae4 FF . WORD RCOUNT ;RECEIVE CHARACTER COUP.T 
2097 JSR PC, $BACC ;CALL BA/CC IN ROUTINE 
2098 . WORD RQ] 'BACCR 7BA/CC IN RECEIVE COMMAND 
2099 . WORD $A ;BUFFER ADDRESS BITS 0-15 
2160 . WORD $B ;BA BITS 16/17 AND CHAR. COUNT 
2101 - ENDC 
2102 kkk kkk 
21038 -NLIST ME 
2104 -ENDM 
2105 
106 
2107 RSI IOI IIIOIIIOIIOIOIISIIIIISIOI III IOIOIOIOI IOI ISO IOI I TI TOI TT TTT TOT I TOT TOI ITO. 
2108 ; BACCIT MACRO - THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE 
2109 ; $BACC SUBROUTINE (WITH DEFAULT ARGUMENTS 
2110 ; IF ARGUMENTS NOT GIVEN) 
2111 DOO III IO ID IID IUIDIIISIIIDISIIIOIIUISIIUIOIUIOIIOIDIOOIOIDIOIIIIDIOIOIDIIIUIOIOIOIOIOIDIDINIOIIOIOIOIIOI IO 
2112 -MACRO BACCIT $A,$8 
2113 «NLIST 
2114 LIST ME 
2115 i1S! 
2116 ;**** MACRO EXPANSION **** 
2117 iF B $A 
2118 JSR PC, $BACC ;CALL BA/CC IN ROUTINE WITH DEFAULTS 
2119 . WORD RQ] 'BACCT ;BA/CC IN TRANSMIT COMMAND 
2120 . WORD TBUF ; TRANSMIT BUFFER ADDRESS 
4544 ee . WORD TCOUNT ;TRANSMIT CHARACTER COUNT 
2123 JSR PC, $BACC ;CALL BA/CC IN ROUTINE 
2124 . WORD RQ] !BACCT 7BA/CC IN TRANSMIT COMMAND 
2125 . WORD $A ;BUFFER ADDRESS BITS 0-15 
2126 . WORD $B ;BA BITS 16 & 17 AND CHAR. COUNT 
2127 -ENDC 
2128 pteee kee 
2129 -NLIST ME 
2130 ~ENDM 
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non 
—— 
WWW 
Wr 


NoMNoNonofoNnonsfenonory 
ed ed od PS ot -d 
SEER EW 
RWW UOSRIOAR 


2145 


2167 010276 
168 


2180 010344 
2182 010350 


005037 
005037 
005737 
001005 
011637 
162737 


017637 
062716 


010046 
010146 
013701 


005000 


032777 
001036 


002374 
000004 
000000 
000002 


002312 


000200 
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—MARARAAAAASAASALAAAASLAASLARAARAARARARASRAASLARR AAA RARER ASARAARARAAAR AAAS AS S| 


SuAIT: 


002374 
002340 


30$: 


171654 





'MARAARASRRAAARASAAAAALAARAASAASAASSAALASLASZARARARARASRRARARARARAAA SAAR AR ASS OS 


SUBROUTINE $WAIT 


FUNCTION = 


CALLING FORMAT: 


NESTING LEVEL 
ENTRY CONDITIONS 


EXIT CONDITIONS 


REGISTERS DESTROYED - 


MARAE AASRALALLALALALALALALARASLAALALSRSA LARS ARRAS AA RR ARRAS ARAAAR AAR ADS SS 
'MALAAASALARAALASZALALASAAAASSLASALESESALA RASA RASA RASA AS AR AAR ASA AAAS SS DD | 


ERRFLG 
COUNT 

NESTPC 

10$ 
(SP) , SUBRPC 
4, SUBRPC 


a(SP) , TEMP 
#2, (SP) 


RO,-(SP) 
R1,-(SP) 
WAIT1,R1 
RO 


#RDO,@SEL2 
60$ 


TO WAIT FOR RDI TO BE SET IN SELO 
OR RDO TO GE SET IN SEL2 


JSR PC, $WAIT 
.WORD FLAG 
(MACRO CALL == WAIT RDI) 

MAY BE CALLED FROM ANOTHER SUBROUTINE 


FLAG = 1 = WAIT FOR RDO 
= 0 WAIT FOR RDI 
WAIT! = DELAY COUNTER (DETERMINED IN INIT.) 
NESTPC= 1 ROUTINE NESTED WITHIN ANOTHER 
SUBROUTINE . 
= 0 = ROUTINE NOT NESTED. 
EITHER RDI OR RDO BIT SET AS EXPECTED 
OR (ERROR CONDITONS): 


1. RDI OR RDO SET, BUT NOT THE EXPECTED ONE 
THE USER WILL BE INFORMED. HOWEVER, 
THIS WILL NOT NECESSARILY BE AN ERROR. 

2. BIT NOT SET BEFORE DELAY EXPIRED. 


AND THE CARRY BIT WILL BE SET. THE CARRY 
BIT SET FLAG THE ERROR CONDITION. 


RESTORED 


;CLEAR ERROR FLAG 

; CLEAR DELAY COUNTER 

iI THIS NESTED IN ANOTHER SUBROUTINE? 
YES - USE THE SUBRPC ALREADY CALCULATED. 
SAVE PC AFTER THE CALL TO SWAIT 

BACKUP TO THE PC OF THE ACTUAL CALL 


;GET THE FLAG FOR RDI OR RDO 

s INC THE PC LEFT ON THE STACK TO POINT 
sPAST THE FLAG ARGUMENT 

SAVE RO 

SAVE R1 

;DELAY COUNTER DETERMINED BY BAUD RATE 
; (DETERMINED IN INIT ROUTINE). 


; INNER LOOP COUNT OF DELAY COUNTER 


31S THE RDO BIT SET IN SEL2? 
:YES - EXIT BIT CHECK LOOP, 
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01 
010570 
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032777 
001064 


012746 
012746 
010600 


104414 
062706 
032777 
001422 
104455 
000011 
020040 
015124 
005237 
005737 
001410 


012746 
012746 
010600 


104414 
062706 


000200 
002416 


000001 
002116 
177772 
177756 


002362 


002340 
000001 


010620 
000001 


000004 
000001 


002362 
002340 


010653 
000001 


000004 


171642 


002366 


171512 


60$: 


70$: 


100$: 


otis. 
L SUBROUTINE 

BIT ARDI ,A@SELO 
BN 70$ 


COUNT 
DEC RO 

BNE 40$ 
DELAY 1 


DEC R1 
BNE 30$ 
ERRDF 1,EMG1,ERRG2 


ERRFLG 

100$ 

TEMP 

100$ 
ACNTRL,ERROR 
B 100$ 

PRINTB #FMS1 


BIT 


ACNTRL ,@SEL2 
BEQ 1 
ERRDF 


9,EMG9,ERRG2 


INC ERRFLG 
BR 100$ 
TST TEMP 
BEQ 100$ 
PRINTB #FMS2 


J 4 
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sies ex ay BIT SE 


T IN SELO? 


SEQ 0048 


YE EX 
CALL SUPERVISOR - ALLOW —. en 


: INCREMENT DELAY COUNTER. 
SLOOP UNTIL RO RETURNS TO 0 


DELAY 100 MICROSE 


;BETWEEN LOOPS. 
REPEAT UNTIL MAXI 


; TIME OUT ERROR 


;SET ERROR FLAG 
;BRANCH TO COMMON 


; WERE WE WAITING F 
;YES = Te 


CONDS 


MUM LOOP SATISFIED. 


EXIT. 
OR THE RDO FLAG? 


OK, EX 
SIS THIS CONTROL OUT ERROR EXPECTED? 


C$BRk 


#1,(PC)+ 
“ences? 
-6(PC) 
74 
-22(PC) 

0 


re 


EMG1 
ERRG2 


ZIF YES, DON'T REPORT THE FOLLOWING ERRORS. 


:RECEIVED AN RDO, 


71S THIS A CONTROL OU 
;NO NEED TO CHECK 


WHEN WAITING FOR RDI 


ERROR CODES. 


[UNEXPECTED CONTROL OUT. 


SET ERROR FLAG. 


WERE WE wre F 
iYE - EXIT 


RECEIVED AN RDI, 





OR THE RDI FLAG? 

WHEN WAITING FOR RDO 
MOV 
MOV 


MOV 
TRAP 
ADD 


#FMS1,-(SP) 
~(SP) 


#FMS2,~(SP) 
#1,-(SP) 

SP RO 
CSPNTB 

#4 SP 
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-ASCIZ /%NZARDO SET EXPECTED RDIZN/ 


eASCIZ /%NZARDI SET EXPECTED RDOZN/ 


DMIDO DMR=-11 Nap ve TESTS MACY11 gg ap ty 
29-JUL=81 11:32 L SUBROUTINES 
010570 005737 002376 TST NESTPC 

010574 001002 BNE 105$ 
010576 005037 002374 CLR SUBRPC 
010602 105$: 
010602 012601 MOV (SP)+,R1 
01 012600 MOV (SP)+,RO 
01 005737 002362 TST ERRFLG 
010612 001401 BEQ 110$ 
010614 00026 SEC 
010616 110$: 
010616 000207 RETURN 
010620 047045 040445 042122 FMS1: 
010626 020117 042523 020124 

10634 054105 042520 052103 

10642 042105 051040 044504 
010650 7045 
010653 5 022516 051101 FMS2: 
01 044504 051440 052105 
010666 042440 050130 041505 
010674 042524 020104 042122 
010702 022517 000116 
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4% THIS NESTED IN ANOTHER SUBROUTINE? 
YES me bee THE SUBROUTINE PC ALONE 


’ E RO 
WAS TIIERE AN ERROR (CARRY CLEARED ON TST) 
sif i WITH CARRY CLEAR 


L 4 
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2268 3 FERRARA REE REE EKER EERE ERE KEE 
2269 53 {RR EARRERRRRRERRRERRRE REE REEERERERREERREREE ERR ERERERERRE EERE ERE 
2270 3 
$355 : SUBROUTINE $CLRQI 
3454 M FUNCTION = TO CLEAR RQI AND WAIT FOR RDI TO BE CLEARED 
2275 3 CALLING FORMAT: JSR PC, $CLRQI 
sso ; (MACRO CALL <= WAIT RQI) 
S75 : NESTING LEVEL - MAY BE NESTED WITHIN ANOTHER SUBROUTINE 
2280 s ENTRY CONDITIONS = WAIT2 = DELAY COUNTER (DETERMINED IN INIT. ROUTINE) 
2281 é NESTPC= 1 ROUTINE NESTED WITHIN ANOTHER 
2282 ; SUBROUTINE. 
scr : = 0 = ROUTINE NOT NESTED. 
2285 ; EXIT CONDITIONS = 1. NON ERROR, DMR READY TO RECEIVE THE — COMMAND 
2286 3 2. ERROR IF RDI DOES NOT CLEAR BEFORE THE 
2287 : DELAY ROUTINE EXPIRES. AN ERROR MESSAGE WILL 
2288 ; OCCUR. ALSO A CARRY BIT WILL BE SET TO FLAG 
2289 » THE ERROR FOR THE USER. 
2290 3 
2291 ; 
5344 é REGISTERS DESTROYED - RESTORED 
2294 PTIIITITITITICTITITI TTT TI TITITiTiTiTiTititiiiiiiiiti tiie LLL eet. 
2295 JL AERA EERE EERE EEE EEK EREKKEEEEKKEEERERAEKEEREREREREE KE 
2296 010706 $CLRQI: 
2297 010706 005037 002362 CLR ERRFLG ;CLEAR ERROR FLAG 
2298 010712 042777 000040 171312 BIC #RQ] ,ASELO “REQUEST INPUT CLEAR 
2299 010720 005737 002376 TST NESTPC :IS THIS NESTED IN ANOTHER SUBROUTINE? 
2300 010724 001005 BNE 10$ ;YES = USE SUBRPC CALCULATED 
2301 010726 011637 002374 MOV (SP) , SUBRPC :SAVE THE PC AFTER THE CALL TO SWAIT. 
San os 162737 000004 002374 a SUB #4, SUBRPC *BACKUP TO THE PC OF THE ACTUAL CALL. 
2304 010740 010046 MOV RO,-(SP) ; SAVE RO 
2305 010742 010146 MOV R1,-(SP) AVE R1 
2306 010744 013701 002314 MOV WAIT2,R1 ‘ee THE DELAY COUNTER (DETERMINED BY 
2307 “BAUD RATE IN INIT ROUTINE) 
2308 010750 12$: 
309 019750 005000 CLR RO ; INNER LOOP COUNT 
2310 010752 20$: 
2311 010752 032777 000200 171252 BIT #RDI,@SELO 71S THE - BIT CLEAR IN SELO? 
2312 010760 001427 BEQ 30$ iY 
2313 010762 BREAK CALL  SOPERVISOR - ALLOW CONSOLE INTERRUPT. 
2314 010762 104422 TRAP C$BRK 
2315 010764 005300 DEC RO ;LOOP UNTIL RO RETURNS TO 0 
2316 010766 001371 BNE 20$ 
2317 010770 DELAY 1 ;DELAY 100 MICROSECONDS 
2318 010770 012727 000001 MOV #1, (PC)+ 
2319 010774 . WORD 
2320 010776 013727 002116 MOV LSDLY,(PC)+ 
2321 011002 000000 . WORD 
2322 011004 005367 177772 DEC ~6(PC) 
2323 011010 001375 BNE 74 
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2324 012 005367 177756 
2325 016 001367 
2326 020 005301 
2327 022 001352 
2328 024 
2329 024 104455 
2330 026 00000 
2331 030 017716 
2332 032 015124 
2335 034 5237 002362 
23 040 
040 
2 04 


005737 002376 
001002 


~w 

Ww 

W 

vi 
lelelelelelelolelelelelelelolololel-lelelo|=) 
aa a cad cad aod aa ce a ca co aa cl ech ee ee a ae a ee ee a 
and and ant al aa ad cd a el ach a cal eel ed cl ad a ce el cl a ed 


3 4 1 

2337 oss 005037 002374 
«339 052 012601 

2340 054 012600 

2341 056 005737 002362 
2342 062 001401 

2345 064 00026 

2344 066 

2345 066 000207 


CZDMIDO_DMR=11 FUNCTIONAL TESTS MACY11 30A(10 
GLOBA 


30$: 


40$: 


50$: 


52) 29=JUL 
IN 


L SUBROUT 


DEC 
BNE 
ERRDF 


R1 
12$ 
1,EMG1,ERRG2 


ERRFLG 
NESTPC 
40$ 
SUBRPC 
(SP)+,R1 
(SP)+,RO 


ERRFLG 
50$ 
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DEC 22 (PC) 
BNE --20 
REPEAT UNTIL MAXIMUM LOOP SATISFIED. 


TIME OUT ERROR 
TRAP aaa 


. WORD 
«WORD EMG1 
«WORD ERRG2 


;SET ERROR FLAG 


WAS THIS A_NESTED ROUTINE? 
IF YES = LEAVE THE SUBRPC ALONE 
:CLEAR THE PC 


sRESTORE R1 

RESTORE RO 

sWAS THERE AN ERROR? (CARRY CLEARED ON TST) 
71F NOT = RETURN WITH CARRY CLEAR 

SET CARRY. 
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2348 DDE EEE ISIS ISISIISIIIIOIOIOISIOIIOIOIIIUIOIIUUIOIOOOI III ITT TOT TT I TIE 

2349 TSE EA EEEIEIS SEIS ISIE IOIEIEISISIOIEISIOIITIOIIOUIOICIOIOIOITITIOIIOUIOII IIT TT TTT I Ir 

2350 ; 

S325 : SUBROUTINE $MSCLR 

Stez : FUNCTION = TO PERFORM A MASTER CLEAR FOR THE DMR11 

2355 ; CALLING FORMAT: JSR PL, $MSCLR 

$328 3 (MACRO CALL == CLEAR) 

2358 : NESTING LEVEL - MAY ONLY BE CALLED Bane IN-LINE CODE (TEST, 

$320 : SUBTEST OR TEST SEGMENT) 

2361 : ENTRY CONDITIONS = WAIT2 = DELAY COUNTER (DETERMINED BY ‘a ROUT INE) 
2362 ; CLRNO = EVEN OR ODD COUNT. THE ACTUAL # IS NOT 
23635 : SIGNIFICANT, HOWEVER IF BIT O IS SET 
2364 ; THEN THE MICROTEST IS SET ALONG WIT 

2365 ; THE MASTER CLEAR. THIS ROUTINE WILL INCR. 
2366 ; THE VALUE. THIS WILL RESULT IN THE MICRO 
338 : TESTS BEING RUN ON EVERY OTHER MASTER CLEAR 
2369 : EXIT CONDITIONS = 1. NO ERROR = DMR11 MICROPROCESSOR INITIALIZED 
2370 ; 2. IF RUN BIT NOT SET BEFORE DELAY TIMEOUT, ERROR 
2371 ; WILL RESULT. ADDITONALLY THE ERROR MESSAGE WILL 
2372 ; RELAY THE RESULTS OF THE MICROTESTS IF THE RUN 
sei ; BIT IS NOT SET. 

2375 : NOTE: THERE IS A PATCH AREA TO ALLOW THESE DIAGNOSTICS 
2376 ; TO RUN ON A M8206 (INSTEAD OF M8207). THIS 

Sie ; SHOULD BE FOR DEVELOPMENT USE ONLY. 

ile ; REGISTERS DESTROYED - RESTORED 

2381 DUIS AEE IOIISISISIIISISSISIIOI IO OIOIOIITIOITIOIOITIOIIOIOIO III TI TT TT TT 

2382 SBE ESERIES OIC IOIOITISICINIIOIUITITIOIIOI OOOO TTT TT TT EE 

2383 011070 '  $MSCLR: 

2384 011070 011637 002374 MOV (SP) , SUBRPC SAVE PC AFTER THE CALL TO SWAiT 

2385 011074 162737 000004 002374 SUB #4, SUBRPC [BACKUP TO THE PC OF THE ACTUAL CALL 

2386 011102 01 MOV RO,~(SP) TSAVE RO 

$744 011104 010146 MOV R1,-(SP) SAVE R1 

Saap 011106 105077 171132 CLRB @BSEL3 CLEAR BSEL3 

2391 011112 000240 NOP PSSA ISIIIOIOIOIIIIOIOIIO IT ono 

2392 011114 000240 NOP 7** PATCH AREA FOR 8206 IF NEEDED ** 

2393 011116 000240 NOP CLR @ASEL6 - 

2394 011120 000240 NOP EERE REE RARER EERE REAR EEE EE 

2395 

2396 011122 032737 000001 002400 BIT #BITU,CLRNO :1S THIS AN ODD MASTER CLEAR. 

2397 011130 001004 BNE :1F YES - BR 

2398 011132 012777 040000 171072 MOV #MCLR,@SELO : ISSUE A MASTER CLEAR. 

se ii Si ed I te 

2401 011142 012777 060000 171062 ; MOV #MCLR'MDIAG,@SELO ; ISSUE THE MASTER CLEAR AND TOGGLE 

2402 ;MICRO TEST SWITCH. 

2403 011150 8$ 
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2404 011150 00024C NOP LARA RRR ERE RARER ERE 
2405 011152 000240 NOP 7** PATCH AREA FOR 8206 IF NEEDED ** 
2406 011154 000240 NOP ;MOV ARUN, @ASELO - 
2407 011156 000240 NOP LARA REE EERE REE RRR 
2408 
2409 011160 005237 002400 INC CLRNO ;INCR WORD (CHANGE ODD TO EVEN ETC.) 
| 2410 011164 013701 002314 MOV WAIT2,R1 7GET THE # OF 100 MICRO SECOND DELAYS 
2411 ;TO WAIT BEFORE EXITING THE ROUTINE. 
2412 011170 19$: 
2413 011170 005000 CLR RO ; INNER LOOP COUNT 
2414 011172 20$: 
2415 011172 032777 100000 171032 BIT #RUN, @SELO iI THE RUN BIT SET IN SELO? 
2416 011200 001025 BNE 40$ ;YES = EXIT 
2417 011202 BREAK CALL SUPERVISOR = ALLOW cates eda f 
2418 011202 104422 C$BRK 
2419 011204 005300 DEC R ;LOOP UNTIL RO RETURNS TO 0 
2420 011206 001371 BNE 20$ 
2421 011210 DELAY 1 ;DELAY 100 MICROSECONDS 
2422 011210 012727 000001 MOV #1,(PC)+ 
2423 011214 000000 - WORD 
2424 011216 013727 002116 MOV LSDLY,(PC)+ 
2425 011222 000000 . WORD 
2426 011224 005367 177772 DEC -6(PC) 
2427 011230 001375 BNE -~ 
2428 011232 005367 177756 DEC -22 (PC) 
2429 011236 001367 BNE -~-20 
2430 011240 005301 DEC R1 sREPEAT UNTIL MAX LOOP SATISFIED. 
2431 011242 001352 BNE 10$ 
2432 011244 ERRDF 1,EMG1,ERRG3 ;REPORT RUN NOT SET 
2433 011244 104455 TRAP CSERDF 
2434 011246 000001 -WORD 1 
2435 011250 017716 -WORD EMG1 
2436 011252 015240 -WORD ERRG3 
2437 011254 40$: 
2438 011254 012601 MOV (SP)+,R1 ;RESTORE R1 
2439 011256 012600 MOV (SP)+,RO ;RESTORE RO 
2440 011260 005037 002374 CLR SUBRPC ;TIDY UP SUBRPC 
2441 011264 000207 RETURN 
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2444 ZBI IISIOISSIISISIIO I ISIOISISISISISIOIIIOIIOIIOIOIOIIOIITICIICIIOI TOOT IT TOT IT IOI TIT II TIE 
2445 3 ‘ © Fe eT TT I TREK KERR EEE EKER EERE EEK EKER 
2446 ; 
gue? ; SUBROUTINE $BASEI 
2449 : FUNCTION = TO PERFORM A BASE IN COMMAND 
2451 : CALLING FORMAT: JSR PC, S$BASE I 
2452 ; .WORD A (SELO MAINTENANCE BITS) 
2453 ; “WORD B (SEL4 = ADDRESS) 
2454 : “WORD C (SEL6 = MODE AND/OR RESUME) 
2455 : (MACRO CALL -= BASEIN OR BASEIN A,B,C) 
2457 : NESTING LEVEL | = MAY ONLY BE CALLED FROM IN-LINE CODE (TEST, 
2498 ; _ SUBTEST OR TEST SEGMENT) 
2460 : ENTRY CONDITIONS - A = MAINTENANCE BITS (1.£. LINE UNIT LOOP BACK) 
2461 ; B = BASE TABLE ADDRESS (SEL4) 
2462 : C = MODE + RESUME (SEL6) 
2463 ; INFACE = NO INTERFACE WRITE REQUIRED 
o464 ; 1 = WRITE INTERFACE (AX3-15) 
2466 : EXIT CONDITIONS - 1. IF NO ERROR DMR11 BASE TABLE ASSIGNED 
2467 ; 2. IF IN DMR MODE, AND INTERFACE WRITE REQUESTED 
2468 : WRITE REQUESTED AX3~15 
2469 : 3. TIMEOUT ERRORS ARE DETECTED IN WAIT SUBROUTINES. 
2470 ; DMRFLG = -1 DMR MODE REQUESTED (USED IN CONTROL IN 
2471 : ROUT INE) 
2472 : 0 DMC MODE OR RESUME REQUESTED. 
2473 : 
2474 : 
2475 : REGISTERS DESTROYED - RESTORED 
2477 I 2 We He III II IH I Te Fe TT II TTT TTI IKI KITA AEE EEE EEEEKEEEKEEEREREEEEEEEE 
2478 mM 2 TH I TIRE IKKE KEKE EEE EEE EKER EKER ERE EEEEEEREKERKEE 
2479 011266 $BASEI: 
2480 011266 011637 002374 MOV (SP) , SUBRPC :SAVE PC AFTER THE CALL TO $WAIT. 
248! 011272 162737 000004 002374 SUB #4 , SUBRPC SBACKUP TO THE PC OF THE ACTUAL CALL 
2483 011300 112777 000043 170724 MOVB  #RQI !BASEI,aBSELO ISSUE THE BASE IN COMMAND. 
2484 011306 012737 000001 002376 MOV #1,NESTPC ;FLAG THAT THE NEXT SUBROUTINE IS NESTED. 
2485 011314 WAIT — RDI WAIT FOR RDI 
2486 :**** MACRO EXPANSION **** 
2487 011314 004737 010276 JSR PC, SWAIT CALL WAIT ROUTINE 
2488 017320 000000 .WORD 0 [FLAG THAT WE'RE WAITING FOR RDI 
pueKe 
2490 011322 BNERROR 10$ SIF NO ERROR, RDI SET - "PROCEED 
2491 011322 103003 BCC 10$ 
2492 011324 062716 000006 ADD #6, (SP) :CORRECT STACK FOR ERROR EXIT 
2493 011330 000467 BR 30$ EXIT 
2494 011332 10$: 
2495 011332 057677 000000 170672 BIS a(SP) ,aSELO :SET ANY MAINTENANCE BITS 
2496 011340 062716 000002 ADD #2, (SP) ZINC. POINTER. 
2497 011344 017677 000000 170664 MOV a(SP) ,aSEL4 [SET UP BASE ADDRESS 
2498 011352 062716 000002 ADD #2, (SP) SINC. POINTER AGAIN 
2499 011356 017677 000000 170654 MOV a(SP) ,aSEL6 “SET UP RESUME BIT AND THE HIGH 2 BITS 
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011364 
011370 


011370 
011374 


011466 
011472 


011474 
011474 
011476 
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062716 
004737 
103445 


aston, 


001004 
032777 
001403 


005037 
000432 


012737 
005737 


001424 
022737 
001004 
032777 
001014 
112777 


004737 
000000 


103405 
113777 


000207 


000002 
010706 
000122 
010000 
002260 
177777 
002262 
000001 
000200 


000055 


010276 


002304 


010706 


002376 
002374 


170634 
170624 


002260 


002366 


170554 


170544 


170544 


15$: 


16$: 


17$: 


30$: 


D 5 
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GLOBAL SUBROUTINES 


ADD 
WAIT 


JSR 
BERROR 


BERROR 
MOVB 
WAIT 
JSR 


CLR 
CLR 
RETURN 





OF THE BASE TABLE ADDRESS 
#2, (SP) INC. POINTER AGAIN (SHOULD BE AT RETURN PC) 
RQ] [CLEAR RQI AND WAIT FOR RDI TO CLEAR 

;**** MACRO EXPANSION **** 


PC, $CLRQI ;CLEAR ROI AND WAIT FOR IT TO BE CLEARED. 
puKKe 
308 IF ERROR, EXIT 
BCS 308 
#122, aBSEL6 ;WAS THIS A DMR BASE IN 
15$ ‘TF NOT. CLEAR DMR FLAG (DMC MODE) 
#RES ,ASEL6 1S THIS A RESUME? 
16$ IF NOT, PROCEED 
DMRF LG :CLEAR DMR FLAG (NO DMR RUN ACKNOWLEDGE). 
30$ :SKIP = TO END 
#-1,DMRFLG ;FLAG THAT DMR MODE WAS REQUESTED. 
INFACE 1S AN_INTERFACE WRITE REQUIRED? 
1F NOT - SKIP TO END 


30$ OE 
ACNTRL,ERROR ZARE WE EXPECTING AN ERROR (IN TEST THAT 
;FORCES eo ERROR) 


17$ :IF NOT PROCEED 
#RDO,ASELO :1F EXPECTING AN ERROR =~ IS RDO SET 
30$ :IF YES = DON'T BOTHER CHANGING THE INTERFACE. 


#ROQI!INTER,@BSELO ; ISSUE WRITE INTERFACE COMMAND. 
RDI :WAIT FOR RDI 
*%** MACRO EXPANSION *«** 


PC, SWAIT : CALL WAIT ROUTINE 
-WORD 0 FLAG THAT WE'RE WAITING FOR RDI 
ret KKK 
30$ IF ERROR, BR TO END. 
BCS 30$ 
AX3,@BSEL7 WRITE _AX3-15. INTERFACE SELECTED 
BY AX3 ant tomcat . INIT. CODE. 
RQ] [CLEAR RQI AND WAIT FOR RDI TO CLEAR. 
;x*x% MACRO EXPANSION **** 
PC, $CLRQI [CLEAR RQI AND WAIT FOR IT TO BE CLEARED. 
punk KKK 
NESTPC :CLEAR THE NEST FLAG 
SUBRPC TIDY UP SUBRPC 


. 2 
| CZDMIDO_DMR=11 Ne fg TESTS MACY11 gh ap ss 12:42 PAGE 57 SEQ 0056 
ie CZDMID.P11 29-JUL=81 11:32 UBAL SUBROUTINE 


2545 LEAR ARERR REE AREER REE REE KERR EERE EERE EERE 
2546 FLEE EERE REE EERE EERE REE EERE EERE EERE EERE EEE 
2547 ; 

toy : SUBROUTINE $CNTIN 

2330 : FUNCTION = TO PERFORM A CONTROL IN COMMAND 

2552 3 CALLING FORMAT: JSR aPCg SCNTIN 

2553 : “WORD A (SEL6 = MAINTENANCE MODE & HDX) 
S2ee : (MACRO CALL == CNTRIN OR CNTRIN A) 

2556 : NESTING LEVEL - MAY ONLY BE CALLED FROM IN-LINE CODE (TEST, 
$220 ; SUBTEST OR TEST SEGMENT) 

2559 : ENTRY CONDITIONS = DMRFLG = =-1 EXPECT CONTROL OUT IF IN DMR MODE 
2560 : = 0 NO CONTROL OUT, IN DMC MODE OR RESUME. 
5263 

2563 : EXIT CONDITIONS = 1. IF NO ERROR = DMR11 CONTROL IN PERFORMED 
2564 ; 2. TIMEOUTS REPORTED IN WAIT SUBROUTINES 

2565 : 3. IF THIS IS A DMR MODE START UP CONTROL IN, 
2566 : THIS ROUTINE WILL WAIT FOR A CONTROL 

2567 : OUT = DMR RUN. IF THIS CONTROL OUT IS 

2568 : NOT RECEIVED, THIS WILL RESULT IN AN ERROR 
2569 : MESSAGE AND A REMINDER TO CHECK THE BAUD RATE, 
sony : INTERFACE AND TURNAROUND (PROBABLE REASON). 
2572 ; 

2573 : 

$278 s REGISTERS DESTROYED 

2576 TRACE ICICI IIIOIIIIIIDIIUIDIOITIOITIUIITIOIOIOIIOI ITO TOIT TOT TTT TTT TT LE 
2577 FD II KR IKE ERIK ERK KEEEREREEEREE EK EK 
2578 011522 $CNTIN: 

2579 011522 011637 002374 MOV (SP) , SUBRPC SAVE PC FROM WHERE THIS SUBR. WAS CALLED. 
2580 011526 162737 000004 002374 SUB #4, SUBRPC “BACKUP TO PC OF ACTUAL CALL 

2581 011534 112777 000041 170470 MOVB #RQI+CNTRL,@BSELO ;SET uA CONTROL IN COMMAND 

2582 011542 012737 000001 002376 MOV #1,NESTPC zFLA G THAT THE NEXT SUBROUTINE IS NESTED. 
2583 011550 WAIT RDI WAIT FOR SETTING OF RDI 

2584 tx*%*® MACRO EXPANSION **** 

2585 011550 004737 010276 JSR PC, $SWAIT ‘CALL WAIT ROUTINE 

2586 011554 000000 -WORD 0 FLAG THAT WE'RE WAITING FOR RDI 

2587 pean kkk 

2588 011556 BNERROR 1$ IF NO ERROR - PROCEED 

2589 011556 103003 BCC 1$ 
2590 011560 062716 000002 ADD #2, (SP) CORRECT RETURN ADDRESS 

2591 011564 000463 BR 20$ ERROR - EXIT 

2592 011566 1$: 

2593 011566 017677 000000 170444 MOV a(SP) . aSEL6 SET MODE DESIRED 

2594 011574 062716 000002 ADD SP) INC. RETURN PC LEFT ON STACK. 

2595 011600 032777 000 170432 BIT WmAINT, aSEL6 ‘WAS MAINTENANCE MODE REQUESTED? 

2596 011606 001402 BEQ 5$ IF NOT, LEAVE DMRFLG AS IS. 

+444 Beis 005037 002260 - CLR DMRF LG ; CLEAR FLAG - NO RUN MODE CONTROL OUT. 

2599 011614 WAIT RQ] :CLEAR RQI AND WAIT FOR RDI TO CLEAR 

2 y**e® MACRO EXPANSION **** 





po ee 
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CZDMID.P11 
2601 011614 
2603 011620 

604 


2606 011632 


608 011632 
2609 011636 


& 


NNNNNI NN 
NNN? 
CO SNOAACH 


SINNNNN 
RERKRS 


g 
o 
SOOCCC8BO COCOCOO BO0C0O00o 
ass 


Sa ee ea ead ad ad od 
™N 


004737 
005737 


001443 
005037 


004737 
000001 
103011 
012746 


032777 
001005 
104455 
000010 
017774 
015124 
000410 


032777 
001004 


020040 


052524 


010706 
002260 
002260 


010276 


011746 
000001 


000004 


000001 


000040 


000207 


002376 
002374 


170342 


170324 


170300 


GLOBAL SUBROUTINES 


7$: 


10$: 


15$: 
20$: 


FMS3: 





ap 4 
JSR PC, $CLRQI 
TST DMRF LG 
BEQ 20$ 
CLR DMRF LG 
WAIT RDO 
JSR PC, $WAIT 

«WORD 1 

BNERROR 7$ 
PRINTB #FMS3 
BR 15$ 
BIT ACNTRL ,@SEL2 
BNE 10$ 
ERRDF 8,EMG8,ERRG2 
BR 15$ 
BIT #DMRRUN , @SEL6 
BNE 1 
ERRDF 9,EMG9,ERRG2 
BIC #RDO! CMD ,A@SEL2 
CLR NESTPC 
CLR SUBRPC 
RETURN 
-ASCII 


; > 
12:42 PAGE 58 


CLEAR ROI AND WAIT von 4 TO BE CLEARED. 


pee 


; WAS DMR MODE REQUESTED “ON BASE IN? 
MODE ) 


TEXPECT RDO TO BE SET 

;**** TIACRO EXPANSION **** 

ZCALL WAIT ROUT INE 

:FLAG THAT WE'RE WAITING FOR RDO 


surne KKK 


ZIF NO ERROR = PROCEED acc 
;PRINT RUN ACKNOWLEDGE NOT RECEIVED. 


DID WE ag BA A CONTROL OUT? 
:1F YES - PROCEED. 
SEXPECTED CONTROL OUT NOT sesiaciahe * + 


+ Bae RUN MODE BIT SET? 
:WRONG CONTROL OUT RECEIVED. 


;CLEAR RDO AND THE COMMAND BITS 


;CLEAR THE NEST FLAG 
CLEAR PC 


/%ADMR RUN ACKNOWLEDGE NOT RCVD.%N/ 


eASCIZ = /%AC(CHECK INTERFACE, BAUD AND TURNAROUND) 2N/ 


SEQ 0057 


7$ 
#FMS3,-(SP) 
#1,~-(SP) 
SP,RO 


C$PNTB 
#4 ,SP 


CSERDF 
8 


EMG8 
ERRG2 


CSERDF 
9 


EMG9 
ERRG2 


a —a_ 
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2657 012052 pete 042116 022451 
5028 012060 00011 


-EVEN 





SEQ 0058 


H 5 
12:42 PAGE 60 


BSA DMR=11 FUNCTIONAL TESTS MACY11 vie 2) ures. SEQ 0059 
CZ2DMID.P11 29=JUL=81 11:32 L SUBROUTINE 
2662 PEI tiie iit iit iti iii titi iti iii titi it 
2663 SL RARER REAR REE REE EERE EERE ERERERE REE 
2664 $ 
aoee 3 SUBROUTINE S$DMRIN 
oth : FUNCTION = TO PERFORM A DMR MODE INPUT COMMAND 
2669 ; CALLING FORMAT: JSR PC, SDMRIN 
2670 3 -WORD C 
2671 3 . WORD 
2672 3 -WORD C 
sot? ; (MACRO CALL == DMRIN A,B,C) 
2675 > NESTING LEVEL - MAY BE CALLED FROM IN-LINE CODE (TEST, 
2676 ; SUBTEST OR TEST SEGMENT) OR FROM THE $LOOP 
pogh 3 SUBROUTINE 
2679 ES ENTRY CONDITIONS = MUST BE IN DMR MODE 
2680 5 FOR ALL COMMANDS EXCEPT WRITE MODEM 
2681 ; B = SEL4 
2682 3 C = SEL6 
2683 ; FOR MODEM WRITE 
2684 ; B = BITS TO CLEAR IN SEL6 
2685 ; C = BITS TO SET IN SEL6 
2686 : NESTPC = 1 = SUBROUTINE NESTED WITHIN ANOTHER SUB. 
orf 3 = 0 - SUBROUTINE NOT NESTED. 
vr 4 : EXIT CONDITIONS - IF NO ERROR - DMR11 MODE INPUT COMMAND PERFORMED. 
2691 ; 
Hs é REGISTERS DESTROYED 
2694 FE Asda laloodelololedeipieedpbebepdoiebedvbobdvbebebeobebpbebedpbebeepbebebebebdeieieabbpabibieein 
2695 SURI SUISIOIOISIOISIIOISIUIOIOIDISIOIOIUIOISIDINIISIUIOIIOIIIOIDIIUIIDIDIOIDIIUIDIDISUISIUIOINIOISIOINIIUNIDIS OEE itt 
2696 012062 $DMRIN: 
2697 012062 005737 002376 TST NESTPC ;1S THIS SUBROUT INE NESTED? 
2698 012066 001005 BNE 1$ TIF YES - DON'T CHANGE SUBRPC. 
2699 012070 011637 002374 MOV (SP) , SUBRPC ;SAVE PC FROM WHERE THIS SUBR. WAS CALLED. 
Sooe BtStns 162737 000004 002374 - SUB #4, SUBRPC ;BACKUP TO PC OF ACTUAL CALL 
2702 012102 117637 000000 002342 MOVB a(SP) , SAVE 7 SAVE DMR INPUT C 
2703 2110 117677 000000 170114 MOVB a(SP) ,aBSELO ;SET UP DMR INPUT COMMAND. 
2704 012116 062716 000002 ADD #2, (SP) ‘INC RETURN PC LEFT ON STACK. 
2705 012122 052777 004 170102 BIS Q],aSE * REQUEST INPUT. 
2706 012130 013746 002376 MOV NESTPC,-(SP) sSAVE THE CURRENT NEST FLAG. 
2707 012134 012737 000001 002376 MOV #1 WNESTPC ;USE THE FLAG TO SHOW THE WAIT 
2708 ® ;ROUTINE IS NESTED. 
2709 012142 WAIT RDI SWAIT FOR SETTING OF RDI 
2710 y**** MACRO EXPANSION **** 
2711 012142 004737 010276 JSR PC, $SWAIT CALL WAIT ROUTINE 
orig 012146 000000 -WORD 0O sFLAG THAT WE‘RE WAITING FOR RDI 
peek keee 
2714 012150 012637 002376 V (SP) +,NESTPC ‘RESTORE THE IGE, 234 FLAG. 
2715 012154 BNERROR 5$ TIF NO ERROR, OK = PROCEED 
2716 012154 103003 BCC 5$ 
2717 012156 062716 000004 ADD #4, (SP) ;UPDATE RETURN ADDRESS. 





. 2 
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CZDM1 
CZDMID.P11 29-JUL=81 11:32 OBAL SUBROUTINE 
2718 012162 000432 BR 10$ sERROR EXIT. 
2719 012164 5$: 
2720 012164 122737 000005 002342 CMPB AWMODEM, SAVE :I1S THIS A MODEM WRITE? 
2721 012172 001413 BEQ 6$ SIF YES = SET/CLEAR BITS. 
2722 012174 017677 Q00C00 170034 MOV a(SP) ,aSEL4 sPASS VALUE FOR SEL4 (VALUE, IF ANY, 
723 :DEPENDS ON THE DMR COMMAND) 
2724 012202 062716 000002 ADD #2, (SP) INC. RETURN PC LEFT ON STACK. 
2725 012206 017677 000000 170024 MOV a(SP) ,aSEL6 sPASS VALUE FOR SEL6 (VALUE, IF ANY, 
2726 [DEPENDS ON THE DMR COMMAND) 
2727 012214 062716 000002 ADD #2, (SP) INC. RETURN PC LEFT ON STACK. 
2728 012220 000412 BR 7$ 
2729 012222 6$: 
2730 012222 047677 000000 170010 BIC @(SP) ,aSEL6 :CLEAR MODEM BITS 
2731 012230 062716 000002 ADD #2, (SP) : INC. RETURN PC LEFT ON STACK 
2732 012234 057677 000000 167776 BIS @(SP) ,aSEL6 7SET MODEM BITS 
2733 012242 062716 000002 ADD #2, (SP) 7 INC. RETURN PC LEFT ON STACK. 
2734 012246 7$: 
2735 012246 WAIT RQ] ;CLEAR RQI AND WAIT FOR RDI TO CLEAR 
2736 ;**** MACRO EXPANSION **** 
2737 012246 004737 010706 JSR PC, $CLRQI CLEAR RQI AND WAIT FOR IT TO BE CLEARED. 
2738 ptken keen 
2739 012252 10$: 
2740 012252 005737 002376 TST NESTPC sWAS THIS ROUTINE NESTED? 
2741 012256 001002 BNE 15$ ZBR IF YES 
2742 012260 005037 002374 CLR SUBRPC CLEAR PC 
2743 012264 15$: 
2744 012264 005037 002342 CLR SAVE sRESTORE TEMP VALUE 


2745 012270 000207 RETURN 
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—MARAARAAARAAAAAASALASLASLSARARAA SALA R ESAS A ARR RAA SERRA LARA SAR AAR AREA ADS SS 


$730 : | eeeneennenennnnnqqneccerceneneenqqqesqnensereeeneeecenneneeeeeneenene 
2752 ; 

tet, ; SUBROUTINE $BACC 

2755 : FUNCTION = TO PERFORM A BUFFER ADDRESS/CHARACTER 

$reg : COUNT IN COMMAND 

2758 : CALLING FORMAT: JSR PC, $BACC 

2759 ; - WORD SELO ;BA/CC IN COMMAND 

2760 ; »WORD SEL4 ;BUFFER ADDRESS 

2761 $ «WORD SEL6 ;BA BITS 16 & 17 AND 
2762 ; ; CHARACTER COUNT 

2763 ; (MACRO CALL == BACCIT OR BACCIT A,B) 
sree A OR (MACRO CALL == BACCIR OR BACCIR A,B) 
2766 : NESTING LEVEL - MAY ONLY BE CALLED FROM IN-LINE CODE (TEST, 
3434 ; SUBTEST OR TEST SEGMENT) 

2769 : ENTRY CONDITIONS - 

eal : EXIT CONDITIONS - IF NO ERROR = DMR11 BA/CC COMMAND IN PERFORMED 
2773 : 

Sore ; REGISTERS DESTROYED - NOT AFFECTED 

2776 CL UIGIIISOIOISIISIIIIIIOIIOISI ISIS IIIOIITIIUIIIOIDIOIOIOIIOIIOIOINIOITIDIOIDIDIIDIOOI OI III 
2777 DSRS IOIIIDIISIIOIIOIIIOIOIUIOIOIUIOIOIOUIOIIOIOIIOIDIOIUIDIIIOIUIOIIOIOIOIIOIIOIOII OE 
2778 012272 $BACC: 

2779 012272 011637 002374 MOV (SP) , SUBRPC 7SAVE PC FROM WHERE THIS SUBR. WAS CALLED. 
2780 012276 162737 000004 002374 SUB #4, SUBR PC :BACKUP TO PC OF ACTUAL CALL 

2781 012304 117677 000000 167720 MOVB a(SP), @BSELO ;SET UP BA/CC COMMAND IN (TRANSMIT OR RECEIVE) 
2782 012312 062716 000002 ADD #2, (SP) : INC POINTER ON STACK 

2783 012316 012737 000001 0C2376 MOV #1,NESTPC [FLAG THAT THE NEXT SUBROUTINE IS NESTED. 
2784 012324 WAIT RDI ;WAIT FOR SETTING OF RDI 

2785  ;**** MACRO EXPANSION **** 

2786 012324 004737 010276 JSR PC, $SWAIT ;CALL WAIT ROUTINE 

2787 012330 000000 «WORD O 7FLAG THAT WE'RE WAITING FOR RDI 

2788 puke ket 

2789 012332 BNERROR 10$ : IF NO ERROR - PROCEED 

2790 012332 103003 BCC 10$ 
2791 012534 062716 000004 ADD #4, (SP) ;CORRECT STACK FOR ERROR EXIT. 

2792 012340 000414 BR 20$ EXIT 

2793 012342 10$: 

2794 012342 017677 O00000 167666 MOV a(SP) ,@SEL4 ;SET BUFFER ADDRESS 

2795 012350 062716 000002 ADD #2, (SP) : INC POINTER ON STACK 

a 012354 017677 000000 167656 MOV a(SP) ,aSEL6 :SET_UP BUF 4 COUNT AND BUFFER ADDRESS 
2798 012362 062716 000002 ADD #2, (SP) ZINC POINTER ON STACK 

2799 012366 WAIT RQ] ;CLEAR RQI AND WAIT FOR RDI TO CLEAR 
2800 7**** MACRO EXPANSION **** 

2801 012366 004737 010706 JSR PC, $CLRQI ;CLEAR RQI AND WAIT FOR IT TO BE CLEARED. 
2802 pkeee kkk 

2803 012372 208: 


2804 012372 005037 002376 CLR NESTPC CLEAR THE NEST FLAG 
2805 012376 005037 002374 CLR SUBRPC CLEAR PC 
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2806 012402 000207 


29-JUL=81 
UBROUT INES 


RETURN 


& 
12:42 PAGE 63 


SEQ 0062 


-. 
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2807 MAARBASALALASALASLALALAAALALAL ALA LASSE E EER SR RRA ARR SSAA ARERR SRSA SERRA ES SY 


2808 +4 TARABBAASAASAAAZBAAAAZALLLZALZALALASALELE LASSE SERS EEE RES ERE RRS ESR RS ESSER SSSR SS SS 
2809 ; 

sein ; SUBROUTINE $SERROR 

2812 3 FUNCTION = TO CHECK THE FIRST 8. BASE TABLE ERROR COUNTS 
ot 3 FOR NON-ZERO VALUES. 

soi2 ; CALLING FORMAT: JSR PC, SERROR 

tH4 : NESTING LEVEL - CAN BE NESTED WITHIN ANOTHER ROUTINE 

2819 3 ENTRY CONDITIONS = SHOULD BE DONE AFTER PROPER SHUTDOWN 

2820 2 NESTPC = 1 = SUBROUTINE NESTED WITHIN ANOTHER SUB. 
$53 ; = 0 = SUBROU'INE NOT NESTED. 

2823 é EXIT CONDITIONS = IF ANY NON-ZERO VALUE FOUND IN THE BASE TABLE A 
2824 PF} SOFT ERROR IS DECLARED. 

2825 3 

2826 $ 

+334 ; REGISTERS DESTROYED = RESTORED 

2829 33 MBAS ASA££L £222 £222 SESE ESLLLESS ELSES ES ESE SEER ESE SRR ESSER RR SE RRR RRR RASS SSS SE 
2830 s TeSAASRSASASAAASZELLALAELESASLE SELLS SEALE SER ERE SSR REAR RRR ARERR RRS RSA RRS RASS SS 
2831 012404 $ERROR: 

2832 012404 005737 002376 TST NESTPC :I1S THIS ROUTINE NESTED? 

2833 012410 001005 ENE 10$ ‘BR IF YES (PC ALREADY SAVED) 

2834 012412 011637 002374 MOV (SP) , SUBRPC ;SAVE PC AFTER THE CALL TO S$WAIT. 

2835 012416 162737 000004 002374 SUB #4, SUBRPC [BACK UP TO THE PC OF THE ACTUAL CALL 
2836 ;THE INSTRUCTION AFTER THE CALL. 

2837 012424 10$: 

2838 012424 010046 MOV RO,-(SP) sSAVE RO 

2839 012426 010146 MOV R1,-(SP) SAVE R1 

2840 012430 012700 002643 MOV #BASE+3,RO sPOINTER TO ACTUAL BASE TABLE COUNTS. 
2841 012434 012701 000006 MOV #6. ,R1 ;CHECK THE 6 NAK BYTES IN THE TABLE 
2842 012440 20$: 

2843 012440 105720 TSTB (RO) + 31S THE NAK COUNT NON-ZERO? 

2844 012442 001022 BNE 30$ :1F YES - REPORT SOFT ERROR 

2845 012444 005301 DEC R1 ;LOOP UNTIL DONE. 

2846 012446 001374 BNE 20$ 

2847 012450 122010 CMPB (RO) +, (RO) z;ARE THE _REPS THE ~—? 

2848 012452 001016 BNE iI NOT = REPORT ERROR 

2849 012454 022737 000022 002114 CMP #18. ,LS$TEST ;I1S THIS TEST 1, (LARGE BUFFER TEST) 
2850 012462 001407 BEQ 5$ 7I1F YES = ALLOW 1 REP 

2851 012464 022737 000016 002114 CMP #14. ,LSTEST 71S THIS TEST 14 fs 

2852 012472 001403 BEQ 25$ 7IF YES = ALSO ALLOW 

2853 012474 105710 TSTB (RO) :IF NOT TEST 18 = SEPORT. i NON ZERO. 
2854 012476 001004 BNE 30$ 

2855 012500 000407 BR 40$ z1F ZERO = OK. 

2856 012502 25$: 

2857 012502 122710 000001 CMPB #1, (RO) 31S THE REP O OR 1 

2858 012506 002004 BGE 40$ sI1F YES = OK (WE ALLOW 1 REP Os CAuse 
2859 :IN TEST 8 AT LOW BAUD RATES 1 REP IS 
2860 SEXPECTED.) 

2861 012510 30$: 

2862 012510 ERRSOFT 5,EMS3,ERRG4 ;REPORT SOFT ERROR 





M 5 
CZDMIDO DMR-11 Nae oe | TESTS MACY11 wy th oitihes 12:42 PAGE 65 SEQ 0064 
CZDMID.P11 29-JUL=81 11:32 L SUBROUTI 


2863 012510 104457 TRAP CSERSOF T 
2864 012512 000005 «WORD 5 
2865 012514 012540 «WORD EMS3 
2866 012516 015470 «WORD ERRG4 
2867 012520 40$: 

2868 012520 005737 002376 TST NESTPC 1S THE ROUTINE NESTED? 

2869 012524 001002 BNE 45$ 3BR_IF YES 

2870 012526 005037 002374 CLR SUBRPC CLEAR SAVED PC 

2871 012532 45$: 

2872 012532 012601 MOV (SP)+,R1 sRESTORE R1 

2873 012534 012600 MOV (SP)+,RO sRESTORE RO 

sere 012536 000207 RETURN 

2876 012540 040502 042523 052040 EMS3: ..ASCIZ /BASE TABLE ERRORS/ 

2877 012546 041101 042514 042440 

2878 012554 051122 051117 000123 

2879 - EVEN 


= 


eastcubness 
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CZDMID.P11 


01 
012614 


012614 
012620 


012622 
012622 
012624 


012624 
012630 
012630 
012632 


012632 
012636 


012676 


103430 
004737 
103425 
004737 
000001 
103421 
032777 
001005 
104455 
000004 
012724 
015124 
000410 
032777 
001004 


104455 
000004 
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002374 
000004 
000042 
167426 
000001 


010276 


010706 


010276 


000001 


001000 


002374 
167430 


002376 


167364 


167346 
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GLOBAL SUBROUTINE 


FERRARA AAA AAR KERR EERE REE REKEREEREEEKEREREE EEE 


LT: 


10$: 


PT TITI TITTLE ELE EEE ELLE EEE LE LEE 


SUBROUTINE $HALT 
FUNCTION = TO SHUTDOWN THE DMR11 


ENTRY CONDITIONS = NONE 
EXIT CONDITIONS = DMR SHUTDOWN 


REGISTERS - NO EFFECT 
SIRI IUIIOISII IO IIIIOISISIIOIIOIOIIIOISIOIIIIIOIOIOIUIOIOIOIIOIIIOIUIOIOISITIIIDIDIOINININIE IE I 
SIRIUS IOI IOIISIIUIDIXISISIISISIOIIIOISISIIOICIOIOIIOISIOIDIOIIIOITIOI IOI OI TOTOT I OTT TTT TT TT TE 
MOV (SP) , SUBRPC ;SAVE THE PC WHEN THE SUBROUTINE WAS i 
SUB #4, SUBRPC SBACK UP TO THE ADDRESS OF THE ACTUAL CALL 
MOVB MRQI'HLT,@SELO ;ISSUE A HALT 
CLRB @SEL2 SCLEAR ANY OUTPUT PENDING 
MOV #1 ,NESTPC ZFLAG THAT THE NEXT SUBROUTINE IS NESTED. 
WAIT RDI ;WAIT FOR RDI 
;****® MACRO EXPANSION **** 
JSR PC, SWAIT ZCALL WAIT ROUT INE 
«WORD 0 FLAG THAT WE'RE WAITING FOR RDI 
pete wee 
BERROR 20$ 7 IF ERROR, EXIT 
BCS 20$ 
WAIT RQ] ;CLEAR RQI AND aiak t FOR RDI TO CLEAR 
;**** MACRO EXPANSION **** 
JSR PC, $CLRQI [CLEAR RQI AND WAIT FOR IT TO BE CLEARED. 
pk 
BERROR 20$ SIF ERROR, EXIT 
BCS 208 
WAIT RDO ;WAIT FOR RDO 
;**** MACRO EXPANSION **** 
JSR PC, $SWAIT :CALL WAIT ROUTINE 
«WORD 1 FLAG THAT WE'RE WAITING FOR RDO 
peek kee 
BERROR 20$ IF ERROR, EXIT 
BCS 208 
BIT ACNTRL ,@SEL2 :IS THIS A CONTROL OUT? 
BNE :IF YES = PROCEED 
ERRDF 4,€MS4,ERRG2 ; ERROR 
TRAP CSERDF 
«WORD 4 
«WORD EMS4 
«WORD ERRG2 
BR 20$ 
BIT #HALTC ,@SEL6 71S THE DMR HALTED? 
BNE :IF YES = EXIT 
ERRDF 4,E€MS4,ERRG2 


ERROR = NOT EXPECTED CONTROL OUT. 
TRAP 


CSERDF 
-WORD 4 
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012724 
015124 


012744 


052125 
042440 
000 


MACY11 30A(10 
GLOBA 


167322 


047504 EMS4: 
051122 
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BIC #RDO! CMD ,@SEL2 
CLR NESTPC 
CLR SUBRPC 


eASCIZ = /SHUTDOWN ERROR/ 


67 


«WORD 
« WORD 


;CLEAR RDO AND COMMAND BITS. 
CLEAR THE NEST FLAG 


sCLEAR THE PC. 


SEQ 0066 


EMS4 
ERRG2 


| 
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2949 FFARR EERE EEE EERE EEE EERE ERE EREREKEREREREEREEERREREREE 
2950 J LRA ERE EEEERERERKEREEER EERE ERKEEREREEEE ERE 
2951 ; 

S328 SUBROUTINE $ROMO 

$938 : FUNCTION = TO READ THE CONTENTS OF THE ROM 

3325 : ENTRY CONDITIONS = ROMADR = ROM ADDRESS 

5325 ; EXIT CONDITIONS = BSEL6 = CONTENTS OF ROM ADDRESS 

2960 3 REGISTERS - NO EFFECT 

2961 : 

2962 $ 

2963 FL AERA EKER EEREREREEEEEEEREREREEERE 
2964 SLA RRA ERE AREER EEKREREREREREKREEEERERERERERREKERAERREREKERE EE 
2965 012744 $ROMO: 

2966 012744 005077 167262 CLR aSELO zINIT 

2967 012750 113777 002413 167256 MOVB ROMADR+1,@SEL2 ;SET HIGH BYTE OF ROM ADDRESS 

2968 012756 052777 001000 167246 BIS #ROMI ,@SELO ;ENABLE SEL6 TO BE USED AS MAINTENANCE REG. 
2969 012764 012777 121053 167246 MOV #121053, aSEL6 :SET UP MICROINSTRUCTION TO 

2970 MOVE IBUS* 2 TO OBUS* 13 

2971 ; (OBUS* 13 IS A SHADOW REGISTER FOR 
2972 BITS 8-11 OF THE PC) 

2973 012772 052777 000400 167232 BIS #STUP,aSELO “CLOCK THE INSTRUCTION 

2974 013000 042777 001400 167224 . BIC #ROMI 'STUP,@SELO ; CLEAR 

2975 013006 042737 000377 013062 BIC #377,1$ :CLEAR ADDRESS FIELD OF BRANCH INST. 
2976 013014 153737 002412 013062 BISB ROMADR, 1$ [ADD ADDRESS OF BRANCH 

2977 013022 052777 001000 167202 BIS #ROMI , @SELO ENABLE SEL6 

2978 013030 013777 013062 167202 MOV 1$,aSEL6 :SET UP MICROINSTRUCTION TO 

2979 ;BRANCH IMMEDIATELY TO PC. BRANCH IS 
2980 :NECESSARY TO TRANSFER PC SHADOW REG TO PC 
2981 013036 052777 000400 167166 BIS #STUP,@SELO : CLOCK THE INSTRUCTION 

2982 :ROM PC = ROM ADDRESS 

2983 013044 042777 001400 167160 BIC #ROMI!STUP,@SELO ;CLEAR 

2984 013052 052777 002000 167152 BIS #ROMO, aSELO :£LOCK IN A MAINTENANCE ROM OUT 

2985 : :ROM CONTENTS ARE NOW IN SEL6. 

see 013060 000207 RETURN 

2988 013062 100000 1$: -WORD 100000 sMICRO INSTRUCTION OPCODE FOR IMMEDIATE 
29 ;BRANCH (ROM ADDRESS IS ADDED INTO BITS 0-7) 
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2990 ZL EAA E REE EEREAEEEERR REREAD 
2991 FLARE EERE ERK EEARR EERE EE 
2992 ; 
2993 ; SUBROUTINE $LOOP 
2995 : FUNCTION = TO ISSUE AN EXTENDED CONTROL IN TO SET 
44: : UP THE MODES! LOOPBACK DESIRFD BY THE USER. 
2998 ; ENTRY CONDITIONS - WMAINT = 0 = DON'T WRITE MAINT. BITS 
2999 ; WMAINT = 1 = SET BITS 
3000 : (WMAINT SET IN INIT CODE) 
3001 : 4» DMCMDE = 0 - DMR MODE 
wos : DMTURN = TURN AROUND CONNECTOR 
3004 ; EXIT CONDITIONS = 
3005 ; 
3006 ; REGISTERS - NOT DESTROYED 
3007 ; 
3008 j 
3009 FL RRR ERR 
3010 FD IKK KEKE KERR KEE KEKE KEE EERE EEE EEK EERE KEE EERE EE 
3011 013064 $LOOP 
3012 013064 005737 002276 TST DMCMDE 31S THE DMR IN DMC MODE? 
3013 013070 001041 BNE 30$ TIF SO, EXIT (CAN'T DO DMR MODE INPUT) 
3014 013072 005737 002306 TST WMA INT :DO WE = v9 WRITE THE MAINTENANCE BITS? 
3015 013076 001436 BEQ 30$ :I1F NOT - 
3016 013100 011637 002374 MOV (SP) , SUBRPC + SAVE THE Be AFTER THE CALL TO $LOOP 
3017 013104 162737 000004 002374 SUB #4, SUBRPC ‘BACKUP TO THE PC OF THE ACTUAL CALL. 
3018 013112 022737 000006 002254 CMP MLLOOP,DMTURN ;IS LOCAL MODEM LOOPBACK DESIRED? 
3019 013120 001007 BNE 10$ : IF NOT — PROCEED. 
3020 013122 012737 000004 013170 MOV AMAINT2,100$ S ENSURE REMOTE LOOPBACK IS CLEAR. 
3021 013130 012737 000010 013172 MOV AMAINT1,101$ :SET MAINT BIT FOR LOCAL LOOPBACK 
3022 013136 000406 BR 20$ 
3023 013140 10$: 
3024 7 IN ALL OTHER LOOPBACK CONFIGURATIONS 
3025 SET MAINTENANCE 2 (CONFIG. TYPE 1,3,7) 
3026 013140 012737 000010 013170 MOV #MAINT1,100$ sENSURE REMOTE LOOPBACK IS CLEAR. 
S56 Bieiee 012737 000004 013172 s08 MOV AMAINT2,101$ 7SET MAINT BIT FOR REMOTE LOOPBACK 
3029 013154 012737 000001 002376 MOV #1,NESTPC ;FLAG THAT THE NEXT SUBROUTINE IS NESTED. 
3030 013162 CALL SDMRIN DMR MODE INPUT COMMAND 
3031 013166 000005 -WORD WMODEM ;WRITE MODEM COMMAND 
3032 013170 000000 100$: -WORD 0O sPITS TO CLEAR IN MODEM REGISTER 
see 013172 000000 101$: -WORD 0O :BITS TO SET IN MODEM REGISTER 
3035 013174 30$: 
3036 013174 005037 002376 CLR NESTPC ;CLEAR THE NEST FLAG 
002374 SUBRPC sCLEAR PC. 


CLR 
RE TURN 
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3040 ; 3 TPORAARSAASZASBSAAAALZASASZAAALALALALALALALSLSALAESEL ESSER ERASE SSR SERRA RRS SASS SERRA SS SG 
3041 . 5 TPRRABSBAAABAAASBAAAAAAALASZALALARSLESAS ESL ESR SSSR SSR SRSA SER ERAS ASS R RRR SASS SS 
3042 3 
Sez ; SUBROUTINE $BUFFS 
3045 : FUNCTION = TO DETERMINE BUFFERS FOR TEST 15 = 19. THIS 
3046 : SUBROUTINE WILL ee ONE OF THE FOLLOWING 
3047 : THREE BUFFER AREAS 
3048 3 1. IF MEMORY MANAGED, 32k - 48k 
3049 ; 2. FREE MEMORY, 7 MORE THAN 4 BYTES. 
3050 ; 3. IF 2 OR 3 NOT POSSIBLE, DEFAULT 4K 
es ; DEFAULT Bur rER WITHIN THIS DIAGNOSTIC. 
3022 : CALL - JSR PC,S$BUFFS 
3055 : NESTING LEVEL | = CALLED ONLY BY TESTS 16-20 
eh : ENTRY CONDITIONS - BUFNUM = # OF RCV & XMIT BUFFERS 
3059 : EXIT CONDITIONS = MMANAG = 1 MEMORY MANAGEMENT USED 
3060 : MMANAG = 0 MEMORY MANAGEMENT NOT USED 
3061 $ RCVBUF = ADDRESS OF RECEIVE BUFFER (VIRTUAL) 
3062 ; RCVBUF+2 = CHARACTER COUNT 
3063 ; RCVBUF+4 = ADDRESS OF NEXT RECEIVE BUFFER 
3064 : (UP TO 64 ADDRESSES AND COUNTS) 
3065 ; XMTSUF = ADDRESS OF TRANSMIT BUFFER (VIRTUAL) 
see : (UP TO 64 ADDRESSES AND COUNTS) 
3068 : REGISTERS - NOT DESTROYED 
3069 ; 
3070 : 
3071 : Z PRRRBSSAAALZASLASLALASLSLASALASSLALSASES ESSER AR ASSES ESAS E SERA RASA SSSA SASS SAS SS SS 
3072 RII II III III III IOI TOI TOTO TITAS AAAASAISISISISIAISISISSIIASSISSIASISASISISS SAMA 
3073 013206 $RUF FS 


3074 013206 011637 002374 
3075 013212 162737 000004 002374 
3076 013220 005037 002352 


3078 013224 012746 000340 
3079 013230 012746 023630 
3080 013234 012746 000004 
3081 013240 012746 000003 


062706 000010 
3084 013252 005737 177572 
3085 013256 005737 002352 


3086 

3087 

3088 013262 001143 

3089 013264 023727 002120 003000 
3091 013272 002537 

3092 013274 012737 000001 002302 
3093 013302 

3094 013302 012700 000340 

3095 013306 104441 





MOV 
SUB 


CLR 
SETVEC 


TST 
TST 


BNE 
CMP 
BLT 
MOV 
SETPRI 


SAVE PC_AFTER THE CALL TO SBUFFS 
;BACKUP TO THE PC OF THE CALL. 


NXMF LG 
#4 ,H#NOXMEM,APRIO7 ;SET UP TRAP 4 (WILL SET FLAG A NXM) 


(SP) , SUBRPC 
#4 , SUBRPC 


a4177572 ADDRESS MEMORY MANAGEMENT REG 
NXMF LG iS THE FLAG STILL CLEARED? 
NOTE: THE ‘a WILL BE SET BY THE TRAP 
iF os IS NO MEMORY MANAGEMENT. 
30$ 7BR TO USE NON-MEMORY MANAG. BUFFERS. 
LSHIMEM, #3000 £18 THERE AY LEAST 48K WORDS? (16K WORDS 
30$ :1F NOT, USE NON-MEMORY MANAG. BUFFERS. 
#1, [FLAG THAT MEMORY MANAGEMENT IS USED 
#PRI07 ;MAKE SURE WE ARE IN KERNEL MODE. 


MOV #PRIO7,RO 
TRAP C$SPRI 


#PR107,-(SP) 
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3096 SETTING PRI SHOULD SHOULD ALSO CLEAR 

3097 sBITS 14 & 15 

3098 013310 012701 172300 MOV #172300,R1 ;GET ADDRESS OF a PDR REG 0. 

fon Bee 012700 000010 108 MOV #8. ,RO ;WRITE PDR REG 0-7 

3101 013320 012721 077406 MOV #77406, (R1)+ sWRITE BiTS FOR THE FOLLOWING PAGE DESCRIPTION 
3102 ;READ/WRITE ACCESS, 128. BLOCK PAGE LENGTH. 
3103 013324 005300 DEC RO :WRITE ALL PDRS. 

3104 013326 001374 BNE 10$ 

3105 013330 012701 172340 MOV #172340,R1 sADDRESS OF KERNEL PAR 0 

3106 013334 005011 CLR (R1) PAR 0, ADDRS ° 

3107 013336 012761 000200 000002 MOV #200,2(R1) PAR 1, ADDRS 20000 - 37776 

3108 344 012761 000400 000004 MOV #400,4(R1) ;PAR 2, ADDRS 40000 - 57776 

3109 013352 012761 002000 000006 MOV #2000,6(R1) PAR 3, ADDRS 200000 = 217776 (BUFFER PAGE 1) 
3110 012761 002200 000010 MOV #2200,10(R1) sPAR 4, ADDRS 220000 = 237776 (BUFFER PAGE 2) 
3111 013366 012761 002400 000012 MOV #2400,12(R1) PAR 5, ADDRS 240000 = 257776 (BUFFER PAGE 3) 
3112 013374 012761 002600 000014 MOV #2600,14(R1) zPAR 6, ADDRS 260000 = 277776 (BUFFER PAGE 4) 
aS 013402 012761 007600 000016 MOV #7600,16(R1) 3PAR 7, ADDRS 160000 = 677776 (1/0 PAGE) 

3115 013410 012703 000400 MOV #256. ,R3 ; COUNTER FOR OUTER LOOP OF Ld PATTERN 
3116 013414 012704 060000 MOV #60000 ,R4 SUSE VIRTUAL ADDRESS TO MAP TO PAR 5 

3117 GENERATE A TEST PATTERN in THE 1ST 8k WORDS 
3118 VIRTUAL ADDRESS 60000 - 111776 

$135 pi eeSe 012737 000001 177572 158 MOV #1,04177572 ;ENABLE MEMORY MANAGEMENT 

3121 013426 012701 000040 MOV #32.,R1 ;COUNTER FOR INNER LOOP OF TEST PATTERN 

3122 013432 012702 002420 MOV #$CCITT,R2 sADDRESS FOR 32. WORD TEST PATTERN. 

3123 013436 16$: 

3124 013436 012224 MOV (R2)+, (R4)+ sWRITE TEST PATTERN 

3125 ;PHYSICAL ADDRESS 200000 - 237776 

3126 013440 005737 002352 TST NXMF LG FLAG WILL BE SET IF WE ADDRESS NXM. 

3127 013444 001050 BNE 29$ 7 1F NXM = DON'T USE MEMORY MANAGEMEN’ . 

3128 013446 005301 DEC R1 ;DO TH INNER LOOP 32. TIMES 

3129 013450 001372 BNE 16$ 

3130 013452 005303 DEC R3 ;DO THE OUTER LOOP 256. TIMES 

3131 013454 001364 BNE 15$ 

Hes Hb ots! 012701 020000 173 MOV #20000 ,R1 COUNTER TO CLEAR THE NEXT 8K WORDS 

3134 013462 005024 CLR (R4)+ CLEAR VIRTUAL ADDRESS 120000 - 157776 

3135 013464 005737 002352 TST NXMF LG DOES AN NXM TRAP OCCUR? 

3136 013470 001036 BNE 29$ :1F SO DON'T USE MEMORY MANAGEMENT. 

3137 013472 005301 DEC R1 

3138 013474 001372 BNE 17$ 

uF 4 013476 005037 177572 CLR a4#177572 ; TURN OFF MEMORY MANAGEMENT 

3141 013502 012737 060000 003240 MOV #60000 , XMTBUF : VIRTUAL ADDRESS OF XMIT BUFFER 

3142 013510 012737 120000 003640 MOV #120000,RCVBUF ;VIRTUAL ADDRESS OF RCV. BUFFER 

3143 013516 022737 000001 002324 CMP #1 , BUF NUM 71S THERE ONLY 1 XMIT & RECEIVE BUFFER? 

3144 013524 001004 BNE 20$ :1F NOT, BR 

3145 013526 012737 037777 002322 MOV #37777,BUFSIZ EACH BUFFER IS 16K BYTES 

3146 013534 000525 BR 60$ 

3147 013536 20$: 

3148 013536 022737 000007 002324 CMP #7 ,BUF NUM 7 ARE THERE 7 XMIT & a Ths (14 TOTAL BUFFER)? 
3149 013544 001004 BNE 1 31F NOT = MUST BE 64 BUFFERS 

3150 013546 012737 004000 002322 MOV #4000 ,BUF SIZ SEACH BUFFER IS ok BYTES 

3151 013554 000515 BR 60$ 
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3152 013556 218: 
3153 013556 012737 000376 002322 MOV #376 ,BUFSIZ EACH BUFFER IS 254. BYTES. 
$194 013564 000511 BR 60$ 
3156 013566 298: 
$157 013568 005037 177572 sos, TR awrt77572 TURN OFF MEMORY MANAGEMENT 
3159 013572 005037 002302 CLR MMANAG ;FLAG THAT MEMORY MANAGEMENT NOT USED. 
3160 013576 CLRVEC #4 RESTORE TRAP 4. 
3161 013576 012700 000004 MOV #4, RO 
3162 013602 104436 TRAP — C$CVEC 
3163 013604 MEMORY R2 ;FIND THE FREE MEMORY AVA'LABLE BETWEEN 
3164 013604 104431 TRAP C$MEM 
3165 013606 010002 MOV _ RO, R2 
3166 ;THE DIAGNOSTIC AND THE DRS (SUPERVISOR). 
3167 013610 021227 002000 CMP = @R2, #2000 [IS THERE AT LEAST 1K WORDS? (NOTE: CONTENTS 
3168 ;OF THE RETURNED ADDRESS OF THE START OF FREE 
3169 [MEMORY CONTAIN THE AMOUNT OF AVAILABLE MEM.) 
3170 013614 003406 BLE 35$ SIF NOT AT LEAST 1K, USE DEFAULT BUFFER. 
3171 013616 010237 003240 MOV —s«aR2, XMT BUF ;USE_THE FREE MEMORY BUFFER. 
3172 013622 011200 MOV _— @R2, RO [SAVE THE WORD SIZE OF THE BUFFER. 
3173 013624 042700 000001 BIC #B1ITO,RO : START WITH AN EVEN #4 OF WORDS. 
3174 013630 000405 BR 408 
3175 013632 358: 
3176 013632 012737 004240 003240 MOV #BIGBUF .XMTBUF ;USE THE DEFAULT BUFFER (1ST HALF FOR XMIT). 
3177 013640 012700 002000 sos. MOV —-#2000.R [1K WORD SIZE. 
3179 013644 013737 003240 003640 MOV —«XMTBUF ,RCVBUF =; CALCULATE THE RECEIVE BUFFER ADDRESS 
3180 013652 06003/ 003640 ADD RO. RCVBUF zAS STARTING IN THE 2ND HALF OF THE BUFFER. 
3181 013656 010001 MOV _—RO.RT BUFFER SIZE IN WORDS. 
3182 013660 022737 000001 002324 CMP #1. BUF NUM TARE WE SETTING UP 1 RECEIVE AND XMIT BUFFER? 
3183 013666 001415 BEQ «GS IF YES - Rl = BYTE SIZE FOR BOTH BUFFERS. 
3184 013670 022737 000007 002324 (MPs #7, BUF NUM ARE WE SETTING UP 7 RCV & 7 XMIT BUFFERS? 
3185 013676 001004 BNE 45$ IF NOT WE MUST NEED 64 RCV & 64 XMIT BUFFERS. 
3186 013700 006201 ASR RT Rl = # BYTES IN THE BUFFERS/8 
3187 013702 006201 ASR R10 
3704 006201 ASR RI 
3189 013706 05 47% 
3190 013710 45$: 
3191 013710 012704 000007 MOV —s- #7 RG :DIVIDE BYTES BY 128. 
3192 013714 468: 
3193 013714 006201 ASR RT ;SHIFT RIGHT 7 TIMES 
3194 013716 005304 DEC R4 
3195 013720 001375 E 46$ 
3196 013722 478: 
3197 013722 010137 002322 MOV _—R1, BUF SIZ ;SAVE THE BUFFER SIZE IN BYTES. 
3198 013726 162737 000002 002322 SUB «#2. BUF SIZ SADJUST BUFFER SIZE BECAUSE WE 
3199 <WILL ADJUST BUFFER STARTING ADDRESS. 
3200 013734 042737 000001 002322 BIC #1 ,BUFSIZ PENSURE WE START WITH AN EVEN # OF BYTES. 
3201 013742 006200 ASR —- RO # OF WORDS IN ALL XMIT BUFFERS. 
3202 013744 010001 MOV _— RO, RT [SAVE # OF WORDS IN ALL RCV BUFFERS. 
$203 013746 015702 405240 sos, MOY. MN TBUF -R2 ADDRESS OF START OF XMIT BUFFERS. 
3205 013752 012703 002420 MOV —s- HSCCITT,R3 ADDRESS OF TEST PATTERN 
3206 013756 012704 000040 MOV —s- #32. , RG ‘# OF WORDS IN THE TEST PATTERN. 


3207 013762 51$: 
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3208 013762 012312 MOV (R3)+, (R2) {WRITE TEST PATTERN INTO ALL XMIT BUFFERS. 

3209 013764 005300 DEC RO TARE ALL THE XMIT BUFFERS WRITTEN? 

3270 013766 001403 BEQ 55$ IF YES PROCEED. 

3311 013770 005304 DEC R4 SCONTINUE WITH TEST PATTERN TILL DONE. 

3212 013772 001373 BNE 51$ 

3213 013774 000766 BR 508 START AT BEGINNING OF TEST PATTERN. 

3214 013776 55$: 

3215 013776 013702 003640 MOV RCVBUF ,R2 ADDRESS OF RECEIVE BUFFERS 

3216 014002 548: 

3217 014002 005022 CLR (R2)+ ;CLEAR ALL RECEIVE BUFFERS. 

3218 014004 005301 DEC R1 

3219 014006 001375 BNE 56$ 

3220 

221 

3222 014010 60S: 

3223 014010 013700 003640 MOV RCVBUF .RO ADDRESS OF RECEIVE BUFFER 

3224 014014 012701 003640 MOV ——« #RCVBUF ,R1 TABLE ADDRESS OF RCV BUFFER POINTERS. 

3225 014020 013702 002324 MOV —« BUF NUM, R2 :# OF RCV. BUFFERS. 

3226 014024 65$: 

3227 014024 010021 MoV _—RO, (R1)+ ;SAVE THE RECEIVE BUFFER ADDRESS 

3228 014026 013721 002322 MOV -—«-BUFSIZ,(R1)+ SAVE THE BUFFER SIZE 

3229 014032 063700 002322 ADD —-BUFSIZ-RO CALCULATE THE NEXT BUFFER ADDRESS. 

3230 014036 005200 INC RO ZCHANGE EVEN ADDRESS TO ODD & ODD TO EVEN. 

3231 014040 005302 DEC R2 TCALCULATE ALL THE BUFFER ADDRESSES. 

3252 014042 001570 BNE 65$ 

2234 014044 013700 003240 MOV XMTBUF , RO ADDRESS OF TRANSMIT BUFFERS 

3235 014050 012701 003240 MOV ——« #XMTBUF ,R1 TABLE OF XMIT BUFFER POINTERS. 

3236 014054 013702 002324 MOV —« BUFNUM,R2 :#OF XMIT BUFFERS. 

3237 014060 012703 000004 MOV = #4, R3 =R3 IS USED TO VARY THE CHARACTER COUNT. 

3238 014064 708: 

3239 014064 010021 MOV _— RO, (R1) + :SAVE THE XMIT BUFFER ADDRESS. 

3240 014066 013711 002322 MOV _—«-BUF SIZ, (R1) TSAVE THE BUFFER SIZE. 

3241 014072 160321 SUB —s R33, (R15 [VARY THE BUFFER SIZE 

3242 014074 063700 002322 ADD BUFSIZRO TCALCULATE THE NEXT BUFFER ADDRESS 

3243 014100 005303 DEC R3 CHANGE THE CHARACTER, COUNT VARIABLE 

3244 014102 032703 000001 BIT #B1TO.R3 :IS THE CONTENTS OF R3 0 

3245 014106 001001 BNE 72$ ‘TP YES. DON'T ADJUST BUFFER ADDRESS. 

3246 014110 005200 INC RO CHANGE EVEN TO ODD ETC. 

3247 014112 72$: 

3248 014112 005703 TST R3 WHAT IS R3. 

3249 014114 002002 BGE 75$ :CONTINUE UNTIL_R3 = -1 

3250 014116 012703 000004 MOV #4, R3 RE-INIT. THE R3 VARIABLE AGAIN. 

3251 014122 75$: 

3252 014122 005302 DEC R2 :CALCULATE ALL THE XMIT BUFFERS. 

$253 014124 001357 BNE 70$ 

3255 014126 005037 002352 CLR NXMFLG ;RESTORE FLAG USED IN TRAP VECTOR. 
002374 CLR SUBRPC ZCLEAR PC. 
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3258 DDI IIISIOIIIOIIOIIOIIISIIISIIIUISISIUIOIUIOIIOIOIIUIIUIOIUOIOUIISIUIIUIO IE itt itt it 
3259 LLU EATER ERR EERE REE AE EEE E EEE ER EERE 
3260 : 
$e5 ’ SUBROUTINE $INOUT 
ic Py 
3263 : FUNCTION = TO MANAGE THE INTERRUPT FROM BASE IN 
see : TO BA/CC OUT IN THE INTERRUPT TESTS 15-19 
3266 3 ENTRY CONDITIONS - arty +* # OF RCV AND XMIT BUFFERS 
3267 : ALL BUFFERS SET UP IN’ THE S$BUFFS SUBROUTINE. 
3268 3 WAITS = # OF OUTER LOOP TIMEOUT COUNTERS. 
3269 : THIS VALUE IS DETERMINED BY THE BAUD 
ese5 . RATE IN THE INIT. SECTION OF CODE. 
HAG ; EXIT CONDITIONS = 
3274 ; REGISTERS - RO - RS DESTROYED 
3275 ; 
3276 ; 
3277 DDRII III TOIT IOI IORI IOI IOI IOI IOI OT IOI IIASA SAS IASI SASAIASAIASISAS OAS A 
3278 SII IOI III UIUC IOI IOI IOI IOI IO IOI IIASA SASSI SISASIS SANS 
3279 014140 $INOUT: 
3280 014140 011637 002374 MOV (SP) , SUBRPC ;SAVE THE PC AFTER THE CALL TO eo 
3281 014144 162737 000004 002374 SUB #4, SUBRPC :BACKUP TO THE PC OF THE ACTUAL CAL 
3282 014152 012737 000001 002376 MOV #1 ,NESTPC ‘oor THAT ANY SUBROUTINE USED WILL Be NESTED. 
3283 014160 013737 002324 002326 MOV BUF NUM, INRCV # OF BA/CC IN RECEIVES 
3284 014166 013737 002324 002330 MOV BUF NUM, INXMIT # OF BA/CC IN TRANSMITS 
3285 014174 013737 002324 002332 MOV BUF NUM, OUTRCV wi OF BA/CC OUT RECEIVES 
3286 014202 013737 002324 002334 MOV BUF NUM , OUT XMT A OF BA/CC OUT TRANSMITS 
3287 014210 005037 002354 CLR INFLAG ;CLEAR INPUT BA/CC FLAG 
3288 014214 005037 002356 CLR OUTFLG ;CLEAR OUTPUT BA/CC FLAG 
3289 014220 005037 002272 CLR START ;CLEAR FLAG TO SHOW START UP NOT DONE (SET 
3290 AFTER CONTROL IN) 
3291 014224 012702 003640 MOV ARCVBUF ,R2 ;ADDR OF RCV. BUFFER TABLE (FOR INPUT) 
3292 014230 012703 003240 MOV A#XMTBUF ,R3 TADDR OF XMIT BUFFER TABLE (FOR INPUT) 
3293 014234 012704 003640 MOV ARCVBUF ,R4 SADDR OF RCV. BUFFER TABLE (OUTPUT CHECKING) 
3294 014240 012705 003240 MOV #XMTBUF ,R5 ;ADDR OF XMIT BUFFER TABLE (OUTPUT CHECKING) 
3295 014244 SETPRI #PRI04 7SET THE PRIORITY TO LEVEL 4 TO ALLOW THE 
3296 014244 012700 000200 MOV #PRI04 ,RO 
3297 014250 104441 TRAP CS$SPRI 
3298 sto TO INTERRUPT AT LEVEL 5 
3299 ease 013737 002316 002320 MOV WAIT3,WAIT4 ; TIMEOUT COUNTER DETERMINED BY a RATE. 
300 014 112777 000143 165744 os MOVB #IESET!RQI'!BASEI, * @BSELO :FIRST COMMAND - BASE IN 
012701 001000 108 MOV #1000,R1 ; INNER LOOP COUNTER 
BREAK ;OPERATOR INTERRUPT ENABLE. CALL TO 
104422 TRAP C$BRK 
2 THE SUPERVISOR TO ALLOW CONSOLE INTERRUPT 
7 (NOTE: INFLAG AND OUTFLG SET IN THE INTERRUPT 
> SERVICE ROUTINES) 
005737 002354 TST INFLAG TARE THE INPUTS DONE? (INISR DONE?) 
001403 BEQ 12$ iif 5” KEEP CHECKING. 
005737 002356 TST OUTFLG TARE T HE OUTPUTS DONE? (OUTISR DONE?) 
001026 BNE 20$ sIF YES EXIT WAIT LOOP. 


12$: 
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3314 014310 DELAY 1 ;WAIT 100 MICROSECONDS. 
3315 014310 012727 000001 MOV #1, (PC)+ 
3316 014314 000000 . WORD 
3317 014316 013727 002116 MOV LSDLY,(PC)+ 
3318 014322 000000 «WORD 0 
3319 014324 005367 177772 DEC -6(PC) 
3320 014330 001375 BNE 4 
3321 014332 005367 177756 DEC =22 (PC) 
3322 014336 001367 BNE --20 
3323 014340 005301 DEC R1 CONTINUE IN LOOP UNTIL R1 = 0. 
3324 014342 001353 BNE 10$ 
3325 014344 005337 002320 DEC WAITS OT aT ea OUTER LOOP COUNTER 
3326 014350 001346 BNE 8$ :1F NOT DONE = GO THROUGH INNER LOOP AGAIN. 
3327 014352 ERRDF 2,EMG2,ERRG1 ; TIMEOUT MESSAGE. 
3328 014352 104455 TRAP CSERDF 
3329 014354 000002 «WORD 2 
3330 014356 017727 «WORD EMG2 
3331 014360 014616 «WORD ERRG1 
3338 ALSO PRINT # OF GUFFERS NOT COMPLETE. 
3334 014362 000453 BR 60$ sEXIT 
S352 014364 20$: 
3337 014364 012700 003640 MOV ARCVBUF ,RO RECEIVE BUFFER POINTER TABLE ADDRESS. 
3338 014370 012701 003240 MOV AXMTBUF ,R1 ; TRANSMIT BUFFERS 
3339 014374 013702 002324 MOV BUF NUM ,R2 7# OF RCV. AND XMIT BUFFERS. 
3340 014400 005737 002302 TST MMANAG SARE THE BUFFERS MEMORY MANAGED? 
3341 014404 001403 BEQ 40$ :IF YES - PROCEED. 
sec6 Beate 012737 000001 177572 sn MOV #1,04177572 [TURN ON MEMORY MANAGEMENT 
3344 014414 012003 MOV (RO)+,R3 zADDRESS OF A RECEIVE BUFFER. 
3345 014416 012104 MOV (R1)+,R4 sADDRESS OF A TRANSMIT BUFFER. 
3346 014420 011005 MOV @RO,R + CHARACTER COUNT. 
3347 014422 022021 CMP (RO) +, (R1)+ ARE THE CHARACTER COUNTS THE SAME? 
3348 014424 001412 BEQ 45$ TIF YES - PROC 
3349 014426 005737 002302 TST MMANAG 71S MEMORY MANAGEMENT TURNED ON? 
3350 014432 001402 BEQ 41$ IF NOT = SKIP TURN OFF 
3351 014434 005037 177572 CLR a@4177572 TURN OFF MEMORY MANAGEMENT . 
3352 014440 41$: 
3353 014440 ERRDF 12,EMG12,ERRG10 
3354 014440 104455 TRAP CSERDF 
3355 014442 000014 -WORD 12 
3356 014444 020141 -WORD EMG12 
3357 014446 016164 -WORD ERRG1O 
3358 014450 000420 BR 60$ sEXIT 
3359 014452 45$: 
3360 014452 122324 CMPB (R3)+,(R4)+ zARE THE CHARACTERS THE SAME? 
3361 014454 001005 BNE 50$ :1F NOT = ERROR EXIT 
3362 014456 005305 DEC R5 ZCHECK ALL THE CHARACTERS 
3363 014460 001374 BNE 45$ 

014462 005302 DEC R2 CHECK ALL THE BUFFERS. 
3365 014464 001355 BNE 40$ 
3366 014466 BR 60$ 
3367 014470 50$: 
3368 014470 005737 002302 TST MMANAG 31S MEMORY MANAGEMENT TURNED ON? 
3369 014474 001402 BEQ 51$ :1F NOT = SKIP TURN OFF, 
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014476 


014546 


014550 
014550 


014560 
014562 


014562 
014566 


014570 
014572 
014572 


014572 


014576 
014576 
014576 
014602 
014604 
014610 
014614 


005037 


104455 
000017 
020235 
016250 


11:32 
177572 


002302 
177572 
000120 


000100 
000021 


012062 


010276 


012562 


000340 


002376 
002374 


165500 
165474 
002114 


CZDMIDO DMR=-11 Saree TESTS MACY11 pg 
29-JUL=81 


51$: 


60$: 


62$: 


63$: 


K 6 
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L SUBROUTINES 
CLR a#177572 ; TURN OFF MEMORY MANAGEMENT. 
ERRDF 15,EMG15,ERRG12 
TRAP CSERDF 
«WORD 15 
«WORD EMG15 
«WORD ERRG12 
TST MMANAG 71S MEMORY MANAGEMENT TURNED ON? 
BEQ 61$ SIF NOT = SKIP TURN OFF 
CLR a4177572 TURN OFF MEMORY MANAGEMENT. 
BIC MIESET!IECLR,@SELO ;DISABLE BOTH INPUT INTERRUPTS 
BIC #1EO,aSEL2 ;DISABLE OUTPUT_INTERRUPT 
CMP #17. ,L$TEST 71S THIS TEST 17, 18 OR 19 ? 
BGT 62$ IF NOT - SHUTDOWN. 
;DOING AN UPDATE IN TESTS 17 = 19, ALLOWS 
;THE USER TO CHECK OUT REMOTE LOOPBACK BETER. 
3A_SHUTDOWN WHEN TESTING THE REMOTE LOOPBACK, 
[WOULD CAUSE THE CONNECTION TO BE DROPPED. 
DMRIN UPDATE :D0 A DMR UPDATE. 
3**** MACRO EXPANSION **** 
JSR PC, $SDMRIN [CALL_DMR MODE INPUT ROUTINE 
.WORD UPDATE ; INPUT COMMAND 
“WORD 0 NO SEL4 
-WORD 0 zNO SEL6 
puKKn KKkKKK 
WAIT RDO ;WAIT FOR RDO 
;**** MACRO EXPANSION **** 
JSR PC, $SWAIT sCALL WAIT ROUTINE 
-WORD 1 [FLAG THAT WE'RE WAITING FOR RDO 
pean anak 
BR 63$ 
SHUTDN ;SHUT DOWN THE DMR 
;****® MACRO EXPANSION **** 
JSR PC, SHALT ;DMR HALT ROUTINE. 
pune KaKK 
SETPRI #PRIO7 RETURN PROCESSOR PRIORITY TO 7 
MOV #PR1I07,RO 
TRAP CS$SPRI 
CLR NESTPC 7CLEAR NESTED FLAG. 
CLR SUBRPC CLEAR PC. 
RETURN 
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CZDMID.P11 29-JUL=81 11:32 GLOBAL ERROR REPORT REPORT SECTION 
3424 -SBTTL GLOBAL ERROR REPORT REPORT SECTION | 
3425 BU 
3426 3/ THE GLOBAL ERROR REPORT SECTION CONTAINS ERROR MESSAGES 
3427 sf THAT ARE USED IN MORE THAN ONE TEST. 
55 hata! uty gta ha hehe ei talent Sa 
. N 
3430 
3431 014616 BGNMSG ERRG1 
3432 014616 ERRG1:: 
3433 014616 PRINTB #FMG3,SUBRPC PC THAT SUBROUTINE WAS CALLED. 

34 014616 013746 002374 MOV SUBRPC , = (SP) 
3435 014622 012746 016366 MOV #FMG3,~(SP) 
3436 014626 012746 000002 MOV #2,-(SP) 
3437 014632 010600 MOV SP RO 
3438 014634 104414 TRAP C$PNTB 
3439 014636 062706 000006 ADD #6,SP 
3440 014642 PRINTB #FMG1,@SELO,@SEL2 ;PRINT SELO AND SEL2 CONTENTS. 

3441 014642 017746 165366 MOV @SEL2,-(SP) 

3442 014646 017746 165360 MOV @SELO,-(SP) 

3443 014652 012746 016302 MOV #EMG1 ,-(SP) 

3444 014656 012746 00000 MOV #3,-(SP) 

3445 014662 01 MOV P 

3446 014664 104414 TRAP C$PNTB 

3447 014666 0627 000010 ADD #10,SP 

3448 014572 PRINTB #FMG2,aSEL4,@SEL6 ;PRINT SEL4 AND SEL2 CONTENTS. 

3449 014672 017746 165342 MOV @SEL6,-(SP) 

3450 014676 017746 165334 MOV @SEL4,-(SP) 

3451 014702 012746 016334 MOV #FMG2 ,-(SP) 

3452 0147 012746 MOV #3,~-(SP 

3453 014712 MOV P 

3454 014714 104414 TRAP C$PNTB 

3455 014716 062706 000010 ADD #10,SP 

3456 014722 PRINTB #FMG21,BUFNUM ; OF BUFFERS 

3457 014722 013746 002324 MOV BUF NUM, = (SP) 

3458 014726 012746 017461 MOV #FMG21 ,-(SP) 

3459 014732 HE tps — #2,-(SP) 

461 014740 104414 TRAP CS$PNTB 

3462 014742 7 000006 ADD . 

3463 014746 PRINTB #FMG22,BUFSIZ ;BUFFER SIZE 

3464 014746 013746 002322 MOV BUF SIZ,-(SP) 

3465 014752 012746 017527 MOV #FMG22 ,~(SP) 

3466 014756 012746 000002 MOV #2,-(SP) 

3467 014762 010600 MOV SP,RO 
014764 104414 TRAP CS$PNTB 

3469 014766 706 000006 ADD #6,SP 
014772 005437 002326 NEG INRCV NEGATE BUFFER VALUES 

3471 014776 005437 002330 NEG INXMIT 

3472 015002 005437 002332 NEG OUTRCV 

3473 01 005437 00233, NEG OUTXMT 

3474 015012 063737 002324 002326 ADD BUF NUM, INRCV CALCULATE BUFFERS ASSIGNED. 

3475 015020 063737 002324 002330 ADD BUF NUM, INXMIT 

3476 015026 063737 002324 002352 ADD BUFNUM,OUTRCV ;CALCULATE BUFFERS RECEIVED. 

3477 015034 063737 002324 002334 ADD BUF NUM, OUTXMT 

3478 015042 PRINTB #FMG23,INRCV,INXMIT 

3479 015042 013746 002330 MOV INXMIT,=(SP) 
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015246 


29-JUL-81 


013746 


005737 
001412 


013746 


002326 
017554 
000003 


165052 
165044 
016302 
000003 


000010 
165026 


002374 


ENDMSG 


BGNMSG 


10$: 


ENDMSG 


BGNMSG 


OBAL ERROR REPORT REPORT SECTION 


PRINTB = #FMG24,0UTRCV,OUTXMT 


10002: 


ERRG2 

ERRG2:: 
TST SUBRPC z1S THE ERROR IN A SUBROUTINE? 
BEQ 10$ sIF NOT, DON'T PRINT SUBR. PC 
PRINTB #FMG3,SUBRPC *PC THAT SUBROUTINE WAS CALLED. 


PRINTB #FMG1,@SELO,@SEL2 ;PRINT SELO AND SEL2 CONTENTS. 


PRINTB #FMG2,QSEL4,@SEL6 ;PRINT SEL4 AND SEL2 CONTENTS. 


L10003: 


ERRG3 

ERRG3: : 
TST SUBRPC 21S Ma 3 ERROR IN A SUBROUTINE? 
BEQ 10$ DON'T PRINT SUBR, PC 
PRINTB #FMG3,SUBRPC “PC THAT SUBROUTINE WAS CALLED. 


SEQ 0077 


INRCV,=(SP) 
#FMG23, (SP) 


#10,SP 
OUTXMT . =(SP) 


#10,SP 


C$MSG 


SUBRPC ,~(SP) 
#FMG3,-(SP) 
Pi 


C$PNTB 
#6,SP 
@SEL2,-(SP) 
@SELO,-(SP) 


#10,SP 


@SEL6,-(SP) 
poe Sees 


#10,SP 


C$MSG 
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013746 
46 


012746 
012746 
010600 
104414 
062706 
000441 


122777 
001011 


012746 
012746 
00 


012746 
012746 
010600 
104414 
062706 
000413 


105777 
001010 


012746 
012746 
010600 
104414 
062706 
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002374 
016366 


164600 


017436 
000001 


000004 


164702 
164704 


164652 
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GLOBAL ERROR REPORT REPORT SECTION 


10$: 


PRINTB 


BIT 
BNE 
CMPB 


BNE 
PRINTB 


12$: 


15$: 


PRINTB 


20$: 





#FMG1,Q@SELO,@SEL2 ;PRINT SELO AND SEL2 CONTENTS. 


ARUN, @SELO 
#1,@BSEL3 
12$ 

#FMGS 


21S THE RUN BIT SET 


. 
paar) 
wn 
m 
m 
me 
NOM 
ae 4 
~~ te 
¢ 
a | 
> 
r= 
ag 
mm 
—] 


:CPU MICRO. FAILED. 


25$ 

#2, @BSEL3 
15$ 

#FMGS 


;DID LINE UNIT MICRO. FAIL? 
sLINE UNIT FAILED. 


25$ 


AMFMGS ;NO RUN - MASTER CLEAR FAILED. 


25$ 
@BSEL3 
#FMG19 


31S BSEL3 STILL 0? 
IF NOT = SEE iF MICRODIAG. RUN. 
;DEVICE IS NOT DMR (DMC?) 


L10004: 


SEQ 0078 


SUBRPC ,=(SP) 
#EMG3,—(SP) 
#2,-(SP) 

SP ,RO 
C$PNTB 
#6,SP 


@SEL2,-(SP) 


#10,SP 


#FMG4 ,~-(SP) 
#1,~(SP) 


#FMGS ,~(SP) 
#1,~-(SP) 


id 


#4, SP 


#FMGS .-(SP) 
#1,~-(SP) 


#FMG19,~(SP) 
#1,~(SP) 


#4 ,SP 
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3592 015466 104422 


3595 015470 


96 
3597 015470 005737 
3598 015474 001412 


015476 013746 


3607 015522 105737 

001003 
105737 
001416 


SeeeeeeRS 


COOONAUSWNO 
°o 
— 
wi 
vw 
S 


pipinlululnlylyta esas 


Las) 
ees 


3623 015572 105737 


001003 

25 015600 105737 

26 015604 001416 
5606 
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002643 
002646 


002646 


002643 
016522 
000003 


000010 
002645 
002650 


002650 
002645 
016573 
000003 
000010 


002644 
002647 


002647 
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L ERROR REPORT REPORT SECTION 


BGNMSG ERRG4 


10$: 


11$: 


12$: 


13$: 


14$: 


15$: 


ERRG4: : 


TST SUBRPC 71S THE ERROR ¥ A SUBROUTINE? 
BEQ 10$ ZIF NOv, DON'T PRINT SUBR. PC 
PRINTB #FMG3,SUBRPC [PC THAT SUBROUTINE WAS CALLED. 


TSTB BASE +3 ONLY PRINT NON-ZERO VALUES 
BNE 11$ 

TSTB BASE +6 

BEQ 12$ 


PRINTB #FMG7,<B,BASE+3>,<B,BASE+6> 


TSTB BASE+5 


BNE 13$ 
TSTB BASE+8. 
BEQ 14$ 


PRINTB #FMG8,<B,BASE+5>,<B,BASE+8. > 


TSTB BASE +4 
BNE 15$ 
TSTB BASE+7 
BEQ 16$ 


PRINTB #FMG9,<B,BASE+4>,<B,BASE+7> 


TRAP 


SUBRPC ,-(SP) 
4FMG3,-(SP) 


- (SP) 
BASE +6, (SP) 
-(SP) 
BASE+3, (SP) 
#FMG7,-(SP) 
#3,-(SP) 
SP,RO 
C$PNTB 
#10,SP 


-(SP) 
BASE+8. , (SP) 
-(SP) 
BASE +5. (SP) 
MG8 ) 


~(SP) 
BASE +7, (SP) 
-(SP) 
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153716 


105737 
001003 
105737 
001416 


104423 


012746 
012746 
010600 
104414 
062706 


017746 


002644 
016644 
000003 


000010 
002652 
002651 


002651 
002652 


016715 
000003 


000010 


017005 
000001 


000010 


177776 
017166 
000002 


000006 
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16$: 


17$: 


208: 
ENDMSG 


BGNMSG 


ENDMSG 


—e 
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L ERROR REPORT REPORT SECTION 


TSTB BASE+10. 
BNE 17$ 
TSTB BASE+9. 
BEQ 20$ 


PRINTB #FMG10,<B,BASE+10.>,<B,BASE+9.> 


L10005: 
T 


ERRG7 
PRINTB #FMG12 


ERRG7:: 


3;BA/CC OUT RECV 


PRINTB #FMG13,@SEL4,@SEL6 ;ACTUAL BA/CC 


PRINTB #FMG15,-2(R4) EXPECTED BA/CC 


L 10006: 
T 


SEQ 0080 


BASE +4, (SP) 


#10,SP 


-(SP) 
BASE +9. , (SP) 
-(SP) 


BASE+10., (SP) 
#FMG10,-(SP) 


#10,SP 


C$MSG 


#FMG12,-(SP) 


@SEL6,-(SP) 
@SEL4.~(SP) 
#FMG13,-(SP) 
#3, -5(SP) 


CS$PNTB 
#10,SP 
~2(R4) ,-(SP) 
#FMG15,-(SP) 
#2,~(SP) 

SP .RO 
C$PNTB 
#6,SP 


C$MSG 
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CSDMID. Pi 


016214 
016216 


016246 


29-JUL=81 


012746 
012746 
010600 
104414 
062706 


017746 


104423 


016146 


016753 
000001 


000010 


000010 


177776 
177776 
017215 
000003 


000010 


177774 
177774 
017274 
000003 


000010 


BGNMSG 


ENDMSG 


BGNMSG 


ENDMSG 


BGNMSG 


ENDMSG 
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OBAL ERROR REPORT REPORT SECTION 


ERRG8 
PRINTB 


PRINTB 


PRINTB 


ERRG10 
PRINTB 


ERRG11 
PRINTB 


ERRG8:: 
#FMG11 ;BA/CC OUT XMIT 
#FMG13,@SEL4,@SEL6 sACTUAL BA/CC 
#FMG14,-4(R5),-2(R5) ;EXPECTED BA/CC 

L10007: 

ERRG10:: 
#FMG16,-2(RO),-2(R1) sRCV CC & XMIT CC 

L10010: 


#FMG17,-4(RO),-4(R1) 


ERRG11:: 
;RCV BUFFER & XMIT BUFFER 


L10011: 


SEQ 0081 


#FMG11,-(SP) 
#1,-(SP) 


-2(R5) ,-(SP) 


#10,SP 


C$MSG 


2 R1),-(SP) 
-2(RO) ,-(SP) 


#10,SP 


CS$MSG 


~4(R1) ,-(SP) 
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60 

3761 016250 BGNMSG ERRG12 

3762 016250 ERRG12:: 

3763 016250 005303 DEC R3 Pte nny TO RECEIVE ADDRESS 

3764 016252 005304 DEC R4 CKUP TO TRANSMIT ADDRESS 

3765 016254 PRINTB #FMG18,R3,R4 ‘PRINT OUT ADDRESS 

3766 016254 OI Osee MOV aa’ =tap) 

3768 016260 012746 017347 MOV #FMG18,-(SP) 
0 000003 3,-(SP) 

3772 016274 062706 000010 ADD #10,SP 

3773 016300 ENDMSG 


3774 016300 L10012: 
3775 016300 104423 TRAP C$MSG 


3782 016302 040445 042523 030114 FMG1: .ASCIZ /%ASELO: %06%A SEL2: %06%N/ 


84 2523 
3785 016324 020072 047445 022466 
3787 016334 040445 042523 032114 FMG2: .ASCIZ /%ASEL4: %06%A SEL6: %06%N/ 


3790 dg to Botte 047445 022466 
3792 016366 040445 051105 047522 FMG3: .ASCIZ /%AERROR IN SUBROUTINE CALLED AT PC: %06%N/ 


000116 
050103 020125 FMG4: .ASCIZ /%ACPU MICROTEST FAILED&ZN/ 


027125 FMGS: .ASCIZ /%ALU. MICROTEST FAILEDZN/ 


022504 


1 
051513 FMG7: .ASCIZ /%ANAKS-NO BUFFER RCV: %D3%A SENT: %D3%N/ 
17 Eat ay 


BESESSSSSSS 


Seer 
MEW —-O 

So 

& 

g 

R 
SSSNers, 
ReV2eese 
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CZDMID.P11 29-JUL-81 11:32 L ERROR REPORT REPORT SECTION 
3816 016573 045 047101 045591 FMG8: .ASCIZ /%ANAKS=BAD DATA” RCV: %D3%A SENT: %D32N/ 
3817 016600 026523 040502 104 
3818 01 04 040524 020040 


16 
040516 051513 FMG9:  .ASCIZ /%ANAKS=BAD HEADER RCV: %D3%A SENT: %D32N/ 


3829 00 
3830 016715 045 G2 1095 050105 FMG10: .ASCIZ /%AREPS-RCV: %D3%A SENT: %D3%N/ 


67 
016744 ——— 031504 047045 
016753 045 e344) 044515 FMG11: .ASCIZ /%AXMIT BACC OUT COMMAND2ZN/ 


3837 016760 020124 04 041503 

3838 016766 047440 052125 04 

3839 016774 0465 04 042116 

3840 017002 047045 000 

3841 017005 045 051101 053103 FMG12: .ASCIZ /%ARCV BACC OUT COMMANDZN/ 
3842 017012 041040 04 020103 

3843 017020 052517 020124 047503 

3844 017026 046515 04 022504 


3846 017036 040445 041501 052524 FMG13: .ASCIZ /ZAACTUAL ADDR. %06%A ACTUAL COUNT %D52N/ 
3854 017112 040445 054105 042520 FMG14: .ASCIZ /%AEXPECTED ADDR. %06%A EXPECTED COUNT %D5%N/ 


000 
3862 017166 040445 054105 042520 FMG15: .ASCIZ /%AEXPECTED ADDR. %06%N/ 
05 040440 


000 
017215 045 051101 0531035 FMG16: .ASCIZ /%ARCV CHAR. COUNT 2D5%A XMIT CHAR. COUNT %D5%N/ 


0 
3871 017252 044103 051101 020056 


CZDMIDO DMR=11_ FUNCTIONAL 


CZDMID.P11 


017714 


017716 
017724 


29-JUL-81 1 


044524 
052125 


041040 
020122 


oO 
Nm 
oO 


Ww eur 
NNW NO 

— St ot ot 

ONWE ON" 


—— = 
SLRS WM NOUVIVIADA & 


RARG F 
o= 


Suey 


047045 
052125 


022463 


047440 





TESTS MACY11 30A(105 
1:32 GLOBA 


FMG17: 


FMG18: 


FMG19: 


FMG21: 


FMG22: 


FMG23: 


FMG24: 


EMG1: 


G 7 
2) 29=JUL-81 12:42 PAGE 85 SEQ 0084 
lL ERROR REPORT REPORT SECTION 


-ASCIZ 


eASCIZ 


-ASCIZ 


-ASCIZ 


eASC1Z 


-ASCIZ 


-ASCIZ 


-ASCIZ 


/%ARCV BUFFER AT %06%A XMIT BUFFER AT %062N/ 


/%ADATA DIFFERS AT RCV ADDR. %06%A AND XMIT ADDR. %06%N/ 


/%ADEVICE NOT DMRZN/ 


/%ABUF FER STATUSZNZAM OF BUFFERS: %D32N/ 


/YABUFFER SIZE: %D5%N/ 


/%AIN =~ RCV ASSIGNED:%D3%A = XMIT ASSIGNED: %D3%N/ 


/%AOUT - RCV RETURNED:%D3%A = XMIT RETURNED: %D32N/ 


/TIME OUT/ 





H 7 
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C2DMID. P11 29-JUL=81 11:32 OBAL ERROR REPORT REPORT SECTION 


3928 017727 EMG2:  .ASCIZ /TIME OUT = DURING INTERRUPT EXERCISE/ 
29 017734 


oo 
mr 
oO 
—y 


EMG8: e-ASCIZ /EXPECTED CONTROL OUT = NOT RECEIVED/ 


Ww 

ve) 

Ww 

wi 

oO 

od 

N 

y 

&- 

Oo 

Ww 

* 

— 

oO 

wi 

Rg 

Nw =~ 
Ww w Ww wi 
Nm Nm ™ rn 
oO Oo nf = 
RRRRG AFRGR 


EMG9: .ASCIZ /UNEXPECTED CONTROL OUT/ 


Ww Ww 
Eeez 
™ = 
oO oO 
yu 
°o 
REGR 
aRITS 
of Nm 
MONWU 
SSPSP 
M—MsM 
—_ — es 
nN So 
wi Ww 
RERS 
S258 


EMG10: .ASCIZ /ERROR = MULTIPLE XMITS/ 


Ww 
PS 
o 
Oo 
ie) 
s 
N“N 
* 
S && 
g 
5 
o 
ooo 
meu 
Nm 
WmMmun 


=) 
ad aad ond ened od 
OnNonN=- 


EMGi?: .ASCIZ /BUFFER ADDR. ERROR/ 


mw 


000 
Soez 020141 103 040510 040522 EMGI2: .ASCIZ /CHARACTER COUNT ERROR/ 


9 020146 052103 051105 041440 

3955 020154 052517 052116 042440 

39 020162 051122 051117 000 

3957 020167 105 051122 051117 EMG13: .ASCIZ /ERROR = MULTIPLE RCVS/ 
3958 020174 026440 0461 

3959 020202 044524 04 020105 


exh 020215 122 053103 020104 EMG14: .ASCIZ /RCVD EXTRA DATA/ 


02 0524 000 
3964 020235 104 97610) Oe iS EMG15: .ASCIZ /DATA ERROR/ 
3966 020250 047125 O28 io8 peeaee EMG16: .ASCIZ /UNEXPECTED HALT RECEIVED/ 


EMG17: .ASCIZ /CONTROL IN PROBLEM - IN INTERRUPT ROUTINE/ 


Ww 
S 
& 
io) 
N 
So 
Ww 
Nm 
NM 
[>] 
NM 
So 
= 
—_ 
Ww 
So 
.> 
N 
——3 a 
Foo Soa 


R 
® & 
~*~ wo 
oS wi 
MN BOWLS 


EMG18: .ASCIZ /SPURIOUS RDO INTERRUPT/ 


oS 
Ww 
Nm & 
=a8 X 
a 

"WO 
Ww 
mnrm — 


020067 EMG19: .ASCIZ /M8207 PROGRAM TIMER OUT OF RANGE/ 








me 
CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052) 29-JUL~-81 12:42 PAGE 87 SEQ 0086 
C2DMID. P11 29=JUL=81 11:32 GLOBAL ERROR REPORT REPORT SECTION 


3984 020410 05112C 043517 04 
0 4 04 


3989 020444 ~EVEN 












020444 
020444 


020444 
020446 
020450 


020452 


29-JUL=81 


177777 
177777 
177777 


CZDMIDO DMR=-11 Nag Oh TESTS MACY11 Tos bie 


CZDMID.P11 1:32 





29-JUL=81 
OAD DEVICE PROTECTION TABLE 


7 
12:42 ’ AGE 88 


-SBTTL LOAD DEVICE PROTECTION TABLE 


BU 
AD DEVICE TO THE SUPERVISOR, SO THAT IT CAN BE 


IF DESIRED. 
SAAITIITTATTTIAT AAT AT AAT ATTA TATATTTATATAATTATAAAATTAALAAAAAATATAS 


BGNPROT 


ENDPROT 


4) PROTECTED FROM TESTING. 


LSPROT:: 


DON'T CHECK CSR ADDRESS 
DON'T CHECK MASSBUS UNIT NUMBER 
;DON'T CHECK DRIVE NUMBER 


SEQ 0087 








K 7 
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0 
020540 
020542 


29-JUL=81 


012700 
104436 
012700 
104447 


103416 


012700 
104447 


103412 


012700 
104447 


103410 


012700 
104447 


103013 
000137 


005037 


000037 


000035 


000036 


021510 


002270 


002264 


INITIALIZE SECTION 
-SBTTL INITIALIZE SECTION 


BA UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU 
3/ THE INITIALIZE SECTION CONTAINS THE CODING THAT s PERF ORMED 

3/ AT THE BEGINNING OF THE TEST SEQUENCE ON THE NEXT UNIT. 
SAPIIITTTITTTTT LATTA TATA AATTA ATTA 


BGNINIT 


LSINIT:: 


SETPRI #PRIO7 3SET DIAGNOSTIC PRIORITY = 7 


MOV #PR107,RO 


TRAP C$SPRI 


MOV SP,PSTACK STORE BASE LEVEL PROGRAM STACK POINTER 


CLR SUBRPC ;CLEAR STORAGE WORD FOR SUBROUTINE PC CALL 

CLR ERROR :CLEAR ERROR FLAGS 

CLR RESUME CLEAR FLAG USED TO ALLOW BASE IN - RESUME. 

CLR DMCMDE ;CLEAR FLAG USED TO INDICATE DMC MODE 

CLR CLRNO :CLEAR WORD USED TO RUN MICRO TESTS ON 
sEVERY OTHER er a a 

CLR NXMF LG :FLAG USED TO MARK A NXM DMR ADDRESS. 

TST FRSTIM :IS THIS THE TIME THROUGH AFTER LOAD? 

BNE 1$ :1F NOT ~ ERROR TRAP VECTOR Bok SAVED 


MOV #1,FRSTIM 
CLR FRSPAS 


FLAG THAT WE'VE BEEN THRU THE 1ST TIME 
7CLEAR COUNTER FOR # OF PASSES AFTER LOAD 


CLR STARES 


CLEAR THE FLAG TO SHOW START/RESTART. 





1$: 
CLRVEC #4 ;ENSURE VECTOR 4 IS IN NORMAL STATE. 
MOV #4,RO0 
TRAP CSCVEC 
READEF #EF.START 71S THIS JUST STARTED? 
MOV #EF .START.RO 
TRAP CSREFG 
BCOMPLETE STARST 7IF YES = BRANCH. 
BCS STARST 
READEF #EF.RESTART 31S THIS A RESTART ? 
MOV #EF RESTART RO 
TRAP CSREFG 
BCOMPLETE STARST :IF YES - BRANCH. 
BCS STARST 
READEF #EF.NEW zIS THIS A NEW PASS? 
MOV #EF .NEW,RO 
TRAP CSREFG 
BCOMPLETE NEwST :1F YES - BRANCH 
BCS NEWST 
READEF #EF.CONTINUE 31S THIS A CONTINUATION? 
MOV #EF . CONTINUE .RO 
TRAP CSREFG 
BNCOMPLETE GETPRM ;1F NOT - GET PARAMETERS wen 
JMP END ZOTHERWISE - DON'T INITIALIZE. 
STARST: 





. 
CZDMIDO DMR-11_ FUNCTIONAL TESTS MACY11 30A(1052)_ 29=JUL-81 12:42 PAGE 90 SEQ 0089 
CZDMID.P11 29-JUL=81 11:32 INITIALIZE SECTION 


4066 020612 NEWST: 

4067 020612 012737 177777 002370 MOV #-1,LOGDEV :INITIALIZE LOGICAL UNIT NUMBER. 

4068 020620 005237 002266 INC FRSPAS ‘INCREMENT # OF PASSES AFTER LOAD. 

4069 020624 005237 002270 INC STARES ‘INCREMENT # OF PASSES SINCE START/RESTART. 

4070 020630 GETPRM: 

4071 020630 005237 002370 INC LOGDEV zNEXT LOGICAL UNIT TO BE TESTED 

4072 020634 023737 002370 002012 CMP LOGDEV,L$UNIT 18 THC MAXIMUM UNIT # # EXCEEDED? 

4073 020642 002363 BGE NEWST :IF YES = DO A NEW STAR 

4074 020644 GPHARD LOGDEV,R1 ‘GET THE P=TABLE POINTER INTO R1 

4075 020644 013700 002370 MOV LOGDEV,RO 
4076 020650 104442 TRAP  C$GPHRD 
4077 020652 010001 MOV RO,R1 
4078 020654 BNCOMPLETE GETPRM :1F NOT AVAILABLE, GET THE NEXT ONE 

4079 020654 103365 BCC GETPRM 
4080 020656 012137 002252 MOV (R1)+,WTYPE :MICROPROCESSOR TYPE 

4081 020662 011100 MOV (R1),RO SSAVE THE ADDRESS 

4082 020664 032700 000007 BIT #7,RO ;DOES THIS DEVICE ADDRESS END IN NON-ZERO? 

4083 020670 001414 BEQ 10$ F NOT = OK (76XXXO) 

4084 020672 042711 000007 BIC #7,(R1) {MAKE IT 76XXx0 

4085 020676 PRINTB #FINIT1,(R1),RO : INFORM THE USER 

4086 020676 010046 MOV RO,-(SP) 
4087 020700 011146 MOV (R1),=(SP) 
4088 020702 012746 021512 MOV #FINITI, (SP) 
4089 020706 012746 000003 MOV #3,-(SP) 
4090 020712 010600 MOV SP,RO 
4091 714 104414 TRAP  C$PNTB 
4092 020716 000010 ADD #10,SP 
4093 020722 10$: 

4094 020722 011137 002232 MOV (R1),CSR zCSR ADDRESS 

4095 020726 011137 002242 MOV (R1) ,BSEL1 

4096 020732 005237 002242 INC BSEL1 ;HIGH BYTE ADDRESS OF CSR 

4097 020736 011137 002234 MOV (R1) ,SEL2 

4098 020742 062737 000002 002234 ADD #2,SEL2 :CONTROL OUT REGISTER ADDRESS 

4099 020750 011137 002244 MOV (Ri) ,BSEL3 

4100 020754 062737 000003 002244 ADD #3,BSEL3 :HIGH BYTE OF SEL2 

4101 020762 011137 002236 MOV (Ri), SEL4 

4102 020766 062737 000004 002236 ADD #4,SEL4 :PORT REG (SEL 4) ADDRESS 

4103 020774 011137 002246 MOV (R1) ,BSEL5S 

4104 021000 062737 000005 002246 ADD #5,BSEL5 ;HIGH BYTE OF SEL4 

4105 021006 011137 002240 MOV (Ri), SEL6 

4106 021012 062737 000006 002240 ADD #6, SEL6 ;PORT REG (SEL 6) ADDRESS 

4107 021020 012137 002250 MOV (R1)+,BSEL7 

4108 021024 062737 000007 002250 ADD #7,BSEL7 :HIGH BYTE OF SEL6 

4109 021032 011100 MOV (Ri) ,RO “GET VECTOR 

4110 021034 032700 000007 BIT #7,R0 :DOES THIS VECTOR END IN NON-ZERO? 

4111 021040 001414 BEQ Ms NOT - Ok (Xx xx0) 

4112 021042 042711 000007 BIC #7, ( ‘MAKE IT x 

4113 021046 PRINTB or IMaT?.(R1).RO : : INF ORM THE USER 

4114 021046 010046 MOV RO,-(SP) 
4115 021050 011146 MOV (R1) ,-(SP) 
4116 021052 012746 021601 MOV #F INIT2,-(SP) 
4117 021056 012746 000003 MOV #3,-(SP) 
4118 021062 010600 MOV SP-R 
4119 104414 TRAP  C$PNTB 
4120 021066 062706 000010 ADD #.9.SP 
4121 021072 11$: 


Mm 7 
12:42 PAGE 91 


| DMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052) 29=JUL-81 SEQ 0090 
site P11. 29=JUL=81 11:32 INITIALIZE SECTION 
4122 021072 011137 002226 MOV (R1) ,DMRVEC :RCV. VECTOR 
4123 021076 011137 002230 MOV (R1) ,DMTVEC : TRANSMIT VECTOR 
4124 021102 011100 MOV (R1) RO =RCV. VECTOR 
4125 021104 5060 000003 CLRB 3(ROS ;CLEAR HI BYTE OF PSW FOR RCV. VECTOR. 
4126 021110 105060 000007 CLRB = 7(RO) SCLEAR HI BYTE OF PSW FOR XMIT. VECTOR. 
4127 THIS WILL ENSURE THAT WE DON'T PICK 
4128 ‘UP AN’ UNEXPECTED BITS IN PROCESSORS 
4129 ‘WHICH USE BITS 11-15 OF THE PSW. IE 
4130 ‘IF BIT 11 IS SET IN AN 11/70 ANOTHER 
4131 ‘REGISTER SET MAY BE USED. 
4132 021114 062737 000004 002230 ADD #4, DMTVEC SADJUST XMIT VECTOR 
4134 :SET UP ISRS FOR DMR. INTERRUPTS ENABLED IN 
4139 STESTS 15-19, 
4137 021122 SETVEC DMRVEC,#INISR,APRIOS  ; INPUT ISR 
4138 021122 012746 000240 MOV #PRIO5,-(SP) 
4139 021126 012746 022064 MOV #INISR,-(SP) 
4140 021132 013746 002226 MOV DMRVEC ,-(SP) 
4141 021136 012746 000003 MOV #3,-(SP 
4142 021142 104437 TRAP  C$SVEC 
4143 021144 062706 000010 ADD #10,S 
4144 021150 SETVEC DMTVEC,MOUTISR,APRIOS ;OUTPUT ISR 
4145 021150 012746 000240 MOV #PRIOS,-(SP) 
4146 021154 012746 023142 MOV #OUTISR,-(SP) 
4147 021160 013746 002230 MOV DMTVEC ,-(SP) 
4148 021164 012746 000003 MOV #3,-(S 
4149 021170 104437 TRAP  C$SVEC 
4150 021172 062706 000010 ADD #10,SP 
4152 021176 062701 000014 ADD #14,R1 sINCR. P-TABLE POINTER. 
4133 021202 012137 002254 MOV (R1)+,DMTURN — : TURNAROUND 
4155 
4156 021206 013700 002224 MOV SPEED ,.RO :GET THE SOFTWARE P-TABLE VALUE GIVEN 
4157 ‘BY THE USER 
4158 
4159 
4160. .021212 13$: 
4161 021212 012701 000002 MOV #2,R1 :GET FIRST TIMER VALUE 
4162 021216 012702 000012 MOV #10. ,.R2 [GET SECOND TIMER VALUE 
4163 021222 14$: 
4164 021222 006301 ASL R1 : TIMER VALUES X 2 
4165 021224 006302 ASL R2 
4166 021226 005300 DEC RO : DEC SPEED VARIABLE 
4167 021230 001374 BNE 14$ + CONTINUE UNTIL DONE INCREASING WAIT VALUES 
4169 021232 010137 002312 MOV R1,WAIT1 i SAVE TIMER VALUE FOR $WAIT 
4170 021236 006201 ASR R1 VALUE 
4171 021240 006201 ASR R1 WAL In AGAIN 
4172 021242 010137 002314 MOV R1,WAIT2 :SAVE TIMER VALUE FOR $MSCLR AND $CLRQI 
417% 021246 010237 002316 MOV R2,WAIT3 [TIMER VALUE FOR $INOUT SUBROUTINE. 
4176 : CHECK TURNAROUND 
4177 021252 012737 000333 002304 Moy #333 ,AX3 *MASK FOR AX3-15 - BIT CLEARED WILL 
} 


— 





366 
4202 021372 
4203 021376 


04 
4205 021376 
4206 021402 


022737 
001004 
042737 
000427 
022737 
001004 
042737 
000417 
022737 
001004 
042737 
000407 
022737 
001007 
042737 
012737 
000404 
005037 
005037 
005737 
001410 
022737 
001430 
022737 
001424 
022737 
001420 


012746 
012746 
010600 
104414 
062706 


012737 
000402 


005037 


CZDMIDO DMR=11 FUNCTIONAL TESTS 
CZDMID.P11 29-JUL=81 


11:32 


000001 
000020 


000006 
000007 
000001 


021670 
000001 


MACY11 30A(1052) 


002254 
002304 


002254 
002304 


002254 
002304 


002254 
002304 
002262 


002254 
002254 


002254 
002254 
002270 


002306 


INITIALIZE SECTION 


208: 
228: 


258: 


30$: 
35$: 


40$: 


4c$: 


45$: 
50$: 


END: 
CNDINIT 


29=JUL-81 
CMP #1,DMTURN 
BNE 
BIC #BIT4,AX3 
BR 30$ 
CMP #2,.DMTURN 
BNE 22$ 
BIC #B1T3,AX3 
BR 30$ : 
CMP #3, DMTURN 
BNE 
BIC #BIT6,AX3 
BR 30$ 
CMP #4, DMTURN 
BNE 
BIC #BIT7,AX3 
MOV #1, INFACE 
BR 40$ 
CLR INFACE 
CLR AX3 
TST MANUF 
BEO 42$ 
CMP #1, DMTURN 
BEQ 45$ 
CMP #3, DMTURN 
BEQ 45$ 
CMP #6, DMTURN 
BEQ 45$ 
CMP #7, DMTURN 
BNE 
CMP #1, STARES 
BNE 45 
PRINTB #FINIT3 
MOV #1,WMAINT 
BR END 
CLR WMA INT 






















N 7 
12:42 PAGE 92 SEQ 0091 


at BN a curcreD? SELECTED. 
TF NO NOT = CONTINUE 
7SELECT V.35 


:1S age REQUESTED? 
ZI1F CONTINUE. 
‘SELECT INTEGRAL MODEM. 


AY EIA REQUESTED? 
F NOT = CONTINUE. 
SSELECT EIAC(XYZ). 


#IS RS422 REQUESTED? 
NOT, DON'T ALLOW INTERFACE CHANGE. 
?SELECT RS422. 


SET FLAG THAT ALLOWS INTERFACE CHANGE. 


CLEAR FLAG -_NO INTERFACE CHANGE. 
;CLEAR AX3 BITS 


DIBA AISI IOI IOI III IOI IE tok 
Z1S THIS A SPECIAL MANUFACTURING TEST CON. ? 
SIF NOT = SET MAINT BIT ONLY FOR MODEM LOOP 


[RRA KEEREKEEKEKEEERREREEKEEEEEE 


ti THIS ee WITH SPECIAL CONNECTOR? 


YES - SET WRITE MAINT. BIT 


F 
S THIS LOCAL LOOP? 
F YES = SET WRITE MAINT. BIT. 
;I1S THIS REMOTE LOOP? 
;IF NOT = CLEAR Sy e€ BIT FLAG 
S THIS THE FIRST PASS? 
F NOT - SKIP MESSAGE 
ARN TO USE ONLY TESTS 17-19 
#F INIT3,~(SP) 

MOV #1,~(SP) 

MOV SP .RO 

TRAP CSPNTB 

ADD #4 SP 


SET FLAG TO WRITE MODEM MAINTENANCE BITS. 
7CLEAR FLAG = DON'T WRITE MAINT. 1 OR 2, 


L10014: 


eal 


iN a a Bi AT RS NR Ta oH 
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4234 021510 104411 TRAP CSINIT 
eStz 021512 040445 Be703¢ go eae FINIT1: .ASCIZ /%A** WARNING = WILL ASSUME ADDRESS %06%A (NOT %06%A)ZN/ 


0215 6 
4243 BS 1205 022466 024501 047045 
4245 021601 045 p2319) Seas FINIT2: .ASCIZ /%A** WARNING = WILL ASSUME VECTOR %03%A (NOT %03%A)2N/ 


4252 021652 047050 052117 022440 
4253 021660 031517 040445 022451 
4254 1 000116 


021666 
4255 021670 040445 025052 ere FINIT3: .ASCIZ /%A** WITH REMOTE LOOPBACK USE TESTS 17 = 19 ONLY **%N/ 


4263 021750 025040 022452 000116 
4264 -EVEN 





















021756 
021756 


021756 


02 
022010 


022014 


29-JUL-81 


012746 


012700 
104436 


013700 
104451 


104444 
005037 


104461 


000340 
023630 
000004 


160216 


000004 
002352 


002370 


002352 


C 8 
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O DROP UNIT SECTION 
-SBTTL AUTO DROP UNIT SECTION 


BU UUUUUUUUUUUUUUUU 
:/ THE AUTO DROP CODING DETERMINES WHETHER OR NOT THE DEVICE WHOSE P-TABLE 

3/7 WAS JUST OBTAINED IS READY FOR TESTING, AND IT IS DROPPED IF NOT READY. 
SAIIILITTTIITTATAAT ATA TAT AAA AAA ATA AAT AAA 


BGNAUTO 
LSAUTO:: 


SETVEC #4,ANOXMEM,APRIO7 ;SET UP NON -EXISTENT MEMORY TRAP VECTOR. 
MOV #PRIO7,=(SP) 


ADD #10,SP 
CLR NXMFLG ;CLEAR FLAG THAT WILL BE SET IF NXM OCCURS. 
TST acsrR s;REFERENCE MEMORY ADDRESS FOR THE DEVICE 


:TO SEE IF IT EXISTS. 


We O SEAS AASERARASASALALAAAAAAAAALASAAA AAAS ASAAASALASALAASLASAR SSAA LASS S DSSS S| 


"IF THE DEVICE DOESN'T EXIST THE RESULTANT TRAP TO VECTOR 04 WILL 
‘ CAUSE THE DEVICE TO BE DROPPED (SEE INTERRUPT ROUTINE "DROPO4' 
; : OTHERWISE THE MEMORY REFERENCE IS UNEVENTFUL AND THE DEVICE is READY. 


FREER EKEEEEEKEKEKEKEKEKEEREEEKEKE EKER REEEEKEEKEKEKEEKE 


CLRVEC #4 RETURN VECTOR 04 TO NORMAL STATE 
MOV #4 ,RO 
TRAP CS$CVEC 
TST NXMFLG DID NXM OCCUR? 
BEQ 1$ F NOT EXIT 
DODU LOGDEV [DROP THE DEVICE 
MOV LOGDEV RO 
TRAP C$DODU 
DOCLN ;DO CLEAN UP - FORCE BACK TO INIT CODE. 
TRAP CS$DCLN 
CLR NXMF LG RESTORE FLAG. 


1$: 
ENDAUTO 
L10015: 
TRAP C$AUTO 









29-JUL=81 1 


005737 
00100 
012777 


104412 


002352 
040000 


CZDMIDO DMR-11 welt gy TESTS MACY11 30A(1052) 
CZDMID.P11 1:32 


160150 





D 8 
29-JUL=81 12:42 PAGE 95 SEQ 0094 
CLEANUP CODING SECTION 


-SBTTL CLEANUP CODING SECTION 
BAU 
37 THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED AT THE 

37 END OF THE TEST SEQUENCE ON A PARTICULAR UNIT. THIS SECTION IS REQUIRED 
37 EVEN IF IT IS A NULL CLEANUP 

SAIIITITIITTAATITT IATA TAT TATA TDA ATTA ATA TTT TATA 


BSNCLN 


LSCLEAN:: 
TST NXMF LG WAS THERE A NXM ERROR? 
BNE 10% :IF YES = SKIP MASTER CLEAR. 
108 MOV #MCLR,@SELO ; ISSUE A MASTER CLEAR. 
ENDCLN 
L10016: 


TRAP CS$CLEAN 








8 
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093110 


022114 


022176 


022200 


022200 


022206 


022210 


29-JUL=81 


113777 


000561 


11:32 


160136 
177760 
000200 


022620 


000004 
000000 
000003 
000001 
000005 
000015 
000002 


002304 


160124 


160042 


GLOBAL INTERRUPT HANDLING ROUTINES 
-SBTTL GLOBAL INTERRUPT HANDLING ROUTINES 


BUUIUUUUUUUUUU UU 
a THE INTERRUPT HANDLING SECTION CONTAINS CODING REQUIRED TO USE 
/ THE ‘SETVEC’ MACRO. NOTE EVERY INTERRUPT ROUTINE SHOULD SAVE 
:/ AND RESTORE RO. 
SAIIITITTTITATITA TATA TATA TATA AAT AAA AAA 


BSNSRV_ INISR : INPUT INTERRUPT —— 
MOV RO,-(SP) 7SAVE RO 
MOV R1,~(SP) 7SAVE R1 
MOV @SELO,R1 :SAVE THE CONTROL IN COMMAND. 
BIC #177760,R1 CLEAR ALL_BUT THE COMMAND BITS (0-3) 
BIT #RDI,@SELO 71S RDI SET 
BNE 1$ IF YES = PROCESS INPUT COMMAND. 
JMP NEXT 2 ISSUE NEXT INPUT COMMAND. 


DIGIT OIIIIEISIIIIIISIOI IO IOISIIIISIDISOIDIODID IOI ISIS IIEIOISIDIDD: 


: PROCESS INPUT COMMAND 


* 
FERRER ERE REE EERE EEK EERE REE EREKEEREEERERREEEKEREEE EER EK 


1$: 
CMP #BACCR,R1 IS ~ A RCV. BA/CC? 
BEQ 298 ;BR IF 
CMP ABACCT,R1 33$ THIS A XMIT. BA/CC? 
BEQ ;BR IF YES. 
CMP #BASEI,R1 1S oes A BASE IN? 
BEQ $ ;BR IF YES. 
CMP ACNTRL,R1 sis oe A CONTROL IN? 
BEQ 15$ ;BR IF Y 
CMP #WMODEM,R1 31S THIS A WRITE MODEM? 
BEQ ;BR IF YES. 
CMP #INTER,R1 eis ee AN INTERFACE WRITE. 
BEQ $ ;BR IF YES. 
CMP #HLT,R1 31S THIS A HALT? 
BEQ 70$ sEXIT - IF YES (NOTHING TO SET UP) 
ERRDF 17,EMG17,ERRG2 ;PROBLEM IF IT'S NOT ONE OF THE — 
TRAP CSERDF 
-WORD 17 
-WORD EMG17 
-WORD ERRG2 
BR 70$ sEXIT 
5$: 
3 WRITE AX3-15 
MOVB AX3,@BSEL7 ;WRITE NECESSARY AX3-15 INTERFACE. 
wet HAS BEEN DETERMINED IN THE INIT 
BR 70$ 
10$: 


ore tt ee ee ee ee ick, 
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taeg ; MODEM WRITE 
4394 022210 022737 000006 002254 CMP om. DMTURN ;I1S LOCAL MODI:M LOOPBACK DESIRED? 
4395 022216 001007 BNE 11$ ‘BR IF NOT 
4396 022220 042777 000004 160012 BIC AMAINT2,@SEL6 ;ENSURE REMOVE LOOPBACK IS Witt 
4397 022226 052777 000110 160004 BIS #DTR!MAINTI, aSEL6 ;SET MAINTENANCE 1 BIT AND DIR 
4398 022234 000546 BR 70$ 
4399 022236 11$: 
4400 022236 042777 000010 157774 BIC AMAINT1,@SEL6 ;ENSURE LOCAL LOOPBACK JS CLEAR. 
4401 022244 052777 000104 157766 BIS ADTR!MAINT2,@SEL6 ;SET MAINTENANCE 2 BIT AND DIR. 
4402 022252 000537 BR 70% ;CLEAR RQI 
4403 022254 15$: 
4404 ; 
ache ;CONTROL IN 
4407 022254 005737 002300 TST MNTMDE 31S MAINTENANCE MODE REQUESTED 
4408 022260 001404 BEQ 17$ ‘BR IF NOT 
4409 022262 012777 000400 157750 MOV #MAINT ,@SEL6 ;REQUEST MAINT. MODE 
4410 022270 000530 BR 70$ 
4411 022272 17$: 
4412 022272 005077 157742 CLR @SEL6 ;FULL DUPLEX - NON-MAINT. MODE. 
4413 022276 000525 BR 70$ 
4414 022300 208: 
4415 $ 
rh ;BASE IN 
ets | 022300 012777 002640 157730 MOV #BASE ,@SEL4 ;BASE TABLE ADDRESS. 
4420 022306 005737 002276 TST DMCMDE z;ARE WE IN DMC MODE? 
4421 022312 001004 BNE 22$ ;BR IF YES 
4422 022314 012777 000522 157716 MOV #DMR ,@SEL6 E MODE . 
4423 022322 000402 BR 23$ ; CHECK LOOPBACK. 
4424 022324 228: 
4425 022324 005077 157710 CLR @SEL6 :DMC MODE 
4426 022330 238: 
4427 022330 005737 002272 TST START :1S THIS THE FIRST BASE IN? 
4428 022334 001004 BNE 245 7 IF NOT - SET RESUME. 
4429 022336 052777 000100 157670 BIS #IEO,aSEL2 ON FIRST BASE IN SET RDO INT.ENABLE. 
4430 022344 000406 BR 25$ 
4431 022346 248: 
4432 022346 052777 010000 157664 BIS HRES ,@SEL6 ;SET RESUME 
4433 022354 012737 177777 002360 MOV #-1,RESFLG zFLAG THAT THIS IS A BASE IN RESUME COMMAND 
4434 ; (THIS WILL BE USED LATER IN THIS ISR TO 
4435 :DECIDE WHAT THE NEXT COMMAND WILL BE) 
4436 022362 25$: 
4437 022362 005737 002254 TST DMTURN 71S INTERNAL LOOPACK REQUESTED? 
4438 022366 001004 BNE 27$ [BR IF NOT - CLEAR LU LOOP 
4439 022370 052777 004000 157634 BIS #LPLU,@SELO ;SET THE LINE UNIT LOOPBACK BIT 
4440 022376 000465 BR 70$ ;CLEAR RQI AND EXIT. 
4441 022400 273: 
ory 022400 042777 004000 157624 BIC #LPLU,@SELO 45° Pe UNIT LOOPBACK (CONNECTOR OR 
4444 022406 000461 BR 70$ :CLEAR RQI AND EXIT 


:BA/CC IN RCV 
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4448 ; 
4449 022410 2938: 
4450 022410 005337 002326 DEC INRCV ;DECREMENT COUNTER 
4451 022414 012277 157616 MOV (R2)+,@SEL4 sRCV BUFFER ADDRESS 
4452 022420 012277 157614 MOV (R2)+,@SEL6 zRCV CHARACTER COUNT 
rear 022424 000406 BR 40$ 
4455 ;BA/CC IN XMIT 
4456 ; 
4457 022426 30$: 
4458 022426 005337 002330 DEC INXMIT ;DECREMENT COUNTER 
4459 022432 012377 157600 MOV (R3)+,@SEL4 :XMIT BUFFER ADDRESS. 
4460 022436 012377 157576 MOV (R3)+,@SEL6 :XMIT CHARACTER COUNT. 
4461 022442 40$: 
4462 022442 005737 002302 TST MMANAG ;ARE THE BUFFERS MEMORY MANAGED? 
4463 022446 001441 BEQ 70$ : IF NOT SKIP CONVERTING VIRTUAL ADDR 
4464 % :TO PHYSICAL ADDR. 
4465 022450 052777 040000 157562 BIS #B1T14,aS=L6 SET BIT 16 OF PHSICAL ADDRESS (1.E. 
4466 ;VIRTUAL ADDR 60000 = PHYSICAL ADDR 200000 
4467 022456 010246 MOV R2,-(SP) sSAVE R2 (NEXT RCV BUFFER ADDRESS) 
4468 022460 017702 157552 MOV @SEL4,R2 :SAVE THE VIRTUAL ADDRESS. 
4469 022464 042777 160000 157544 BIC #160000,@SEL4 ;CLEAR BITS CORRESPONDING TO THE PAGE # 
4470 3 IN THE VIRTUAL ot a 
4471 022472 042702 017777 BIC #17777,R2 : + SAVE raed THE PAGE # IN THE SAVED ADDR. 
4472 022476 022702 060000 CMP #60000 ,R2 31S THIS PAGE 3? 
4473 022502 001421 BEQ 44$ sir YES, ek ie ADDRESS CALCULATED 
4474 022504 022702 100000 CMP #100000 ,R2 SIS THIS PAGE 4 
4475 022510 001004 BNE 41$ :IF NOT SEE IF it? S PAGE 4 OR 5 
4476 022512 052777 020000 157516 BIS #B1T13,aSEL4 SET BIT FOR PHYSICAL ADDR (I.E. VIRTUAL 
4477 TADDR 100000 = PHYSICAL ADDR. 220000 
4478 022520 000412 SR 44$ 
4479 022522 41$: 
4480 022522 022702 120000 CMP #120000. R2 31S THIS PAGE 4? 
4481 022526 001004 BNE 42$ TIF NOT, MUST BE PAGE 5. 
4482 022530 052777 040000 157500 BIS #B1T14,a9SEL4 SET BIT FOR PHYSICAL ADDR (I.E. VIRTUAL 
4483 SADDR 120000 = PHYSICAL ADDR. 240000 
4484 022536 000403 BR 44$ 
4485 022540 42$: 
4486 022540 052777 060000 157470 BIS #B1T14'BIT13, me ix} BIT FOR PHYSICAL ADDR (I.E. VIRTUAL 
4487 R 140000 = PHYSICAL ADDR. 260000 
4488 022546 44$: 
4489 022546 012602 MOV (SP)+,R2 sRESTORE R2 (NEXT RCV BUFFER ADDRESS) 
oy 022550 000400 BR 70$ ;CLEAR RQI AND EXIT 
4492 
4493 022552 70$: 
4494 022552 010137 002364 MOV R1,LAST : SAVE THE INPUT COMMAND (USED 
4495 TO DETERMINE NEXT INPUT COMMAND) 
4496 022556 005737 002276 TST DMCMDE TARE WE IN DMC MODE ? 
4497 022562 001011 BNE 80$ . :IF YES - DON'T USE IECLR 
4498 ;NOTE: INTERRUPT CAPABILITY FOR RQI 
4499 ;CLEAR IS ONLY AVAILABLE IN DMR MODE. 
4500 022564 012601 MOV (SP)+,R1 *RESTORE R1 
4501 022566 012600 MOV (SP)+,RO sRESTORE RO 
4502 022570 052777 000020 157434 BIS MIECLR,@SELO ;SET INTERRUPT ENABLE FOR RDI CLEAR. 
4503 022576 042777 000040 157426 BIC #RQ],aSELO ;CLEAR RQI - INT. GENERATED WHEN RDI 





‘aptinemaciscaeestates senna mane mcr nineteen 
CZDMIDO DMR=11_ FUNCTIONAL + B's MACY11 oe 


CZDMID.P11 


022604 
022606 
022606 
022614 


02 
023014 
023016 


29-JUL=81 
000002 


042777 


022737 


001411 
005737 


000020 


000002 
002274 
002354 
002356 


002276 
002272 


000003 
000015 
000005 


002262 


000155 


002306 
000145 


002272 
000141 


002326 
002274 
000001 
002360 


157416 


002364 


002364 
002364 
002364 


157274 


157256 


157242 


002326 
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80$: 


NEXT: 


110$: 


1118: 


115$: 


117$: 


130$: 


150$: 





CLEARS IN RESPONSE. 
RTI RETURN AND WAIT FOR ROI CLEAR INTERRUPT. 


BIC MIECLR,@SELO ENSURE INTERRUPT ENABLE FOR RDI CLEAR IS CLR. 
CALL $CLRQI 7CLEAR RQI AND WAIT FOR RDI TO CLEAR 


FERRARA REAR ERERERREREREREEH. KEKE REREREEREEEEEEREERERERREEE 


> RDI CLEAR = DETERMINE NEXT INPUT COMMAND. 


. 
FERRER REE EEE REE REE ERE ERERERE 


CMP #MHLT LAST ; WAS - _LAST COMMAND A HALT? 
BN 110$ F 


E 1 =~ PROCEED. 
TST RESUME ARE WE TESTING RESUME? 
BEQ 170$ :1F NOT, DON'T ISSUE ANOTHER COMMAND. 
TST INFLAG S INPUT BUFFER DONE? 
BEQ 110$ :1F NOT, PROCEED. 
TST OUTFLG sOUTPUT BUFFER DONE? 
BNE 170$ :1F YES, DON'T ISSUE ANOTHER COMMAND. 
TST DMCMDE zARE WE IN DMC MODE? 
BEQ 111$ :1F NOT (DMR MODE) = CHECK , INTERFACE . 
TST START HAVE “ DONE A CONTROL IN? 
BEQ 130$ IF NOT, DO IT 
BR 150$ ‘OTHERWISE - KEEP CHECKING ON NEXT COMMAND. 
CMP M#BASEI,LAST WAS THE LAST COMMAND A BASE IN ? 
BEQ 115$ :IF YES - SEE IF INTER. OR M. WRITE IS NEEDED? 
CMP MINTER,LAST [WAS THE LAST COMMAND AN AX3-15 WRITE? 
BEQ 117$ ZIF YES = CHECK FO MODEM WRITE. 
CMP MWMODEM LAST :WAS THE LAST mw A WRITE MODEM. 
BEQ 130$ :IF YES = ISSUE A CONTROL IN. 

150$ [KEEP CHECKING FOR NEXT COMMAND. 


TST eace ‘aa tr AN — WRITE NEEDED? 
— #IESET!RQI! INTER, BBSELOS ; ISSUE AN AX3-15 WRITE COMMAND. 


TST WMA INT WRITE MAINT 1 OR 2? 


BEQ 130$ IF NOT = SKIP WRITE MODEM COMMAND. 
= #IESET!RQI !WMODEM, -@BSELO ; ISSUE A MODEM WRITE COMMAND 
INC STAR ;SET FLAG THAT CONTROL IN WAS ISSUED. 
MOVB PIESET!ROI!CNTRL @BSELO ; ISSUE A CONTROL IN 

BR 170$ 

TST INRCV zARE ALL THE BA/CC_IN RCVS DONE? 

BEQ 160$ :1F YES - BR TO SEE IF XMITS DONE. 
TST RESUME 71S A_TEST OF RESUME REQUESTED? 

BEQ 153$ BR IF NOT. 

BIT #B1T0, INRCV :1S THIS AN ODD COUNT? 

BEQ 153$ 


:BR IF NOT. 
TST RESFLG [WAS THE LAST COMMAND A BASE IN RESUME? 
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4560 023022 001004 BNE 1528 :IF YES. ISSUE BA/CC 
4561 HALT = TO TEST RESUME. NOTE: THIS WILL 
4562 SOCCUR ONLY WHEN RESUME IS REQUESTED, 
4563 FOLLOWING EVERY OTHER BA/CC 
4564 >COMMAND (NEVER FOLLOWING A RESUME) 
4565 023024 112777 000142 157200 MOVE — #IESET!RQI!HLT, @BSELO ;HALT JT 
4566 023032 000440 BR 170$ 
4567 023034 1528: 
4568 023034 005037 002360 CLR RESFLG ;CLEAR FLAG. 
4569 023040 153$: 
4570 023040 112777 000144 157164 MOVB #IESET!RQI'!BACCR,@BSELO ; ISSUE A BA/CC IN RCV. COMMAND. 
4571 023046 000432 BR 170$ 
4572 023050 160$: 
4573 023050 005737 002330 TST INXMIT GARE ALL THE BA/CC IN XMITS DONE? 
4574 023054 001424 BEQ 165$ 31F YES, SET THE FLAG 
4575 023056 005737 002274 TST RESUME :1S A TEST OF RESUME REQUESTED? 
4576 023062 001415 BEQ 163$ :BR IF NOT. 
4577 023064 032737 000001 002330 BIT #B1TO, INXMIT 31S THIS AN ODD COUNT? 
4578 023072 001411 BEQ 163$ :BR IF NOT. 
4579 023074 005737 002360 TST RESFLG :WAS THE LAST COMMAND A BASE IN RESUME? 
4580 023100 001004 BNE 162$ IF YES, ISSUE BA/CC 
4581 HALT = TO TEST RESUME. NOTE: THIS WILL 
4582 SOCCUR ONLY WHEN RESUME IS REQUESTED, 
4583 :FOLLOWING EVERY OTHER BA/CC 
4584 COMMAND (NEVER FOLLOWING A RESUME) 
4585 023102 112777 000142 157122 MOVB -#IESET!RQI!HLT,@3SELO ;HALT IT | 
4586 023110 000411 BR 1708 
4587 023112 1628: 
4588 023112 005037 002360 CLR RESFLG ;CLEAR BASE IN RESUME FLAG. 
4589 023116 163$: 
4590 023116 112777 000140 157106 MOVB #IESET!RQI!BACCT,@BSELO ; ISSUE A BA/CC IN XMIT COMMAND. 
4591 023124 000403 BR 170$ 
4592 023126 1658: 
4595 023126 012737 177777 002354 MOV = #=1, INFLAG FLAG THAT ALL BA/CC INS DONE. 
| 
4595 023134 170$: 
4596 023134 012601 MOV (SP)+,R1 RESTORE R1 
rita 023136 012600 MOV (SP) +,RO RESTORE RO 
4599 023140 ENDSRV 
4600 023140 L10017: 
4601 023140 000002 RTI 
4603 FREER KER EER ERE ERE KEKE EEE EERE EERE EKER } 
4604 DEERE EKER ERE EERE REE REE EKER EEE EER ERK EEE EERE EERE EE 
4605 
4606 023142 BGNSRV OUTISR ;OQUTPUT INTERRUPT SERVICE ROUTINE | 
4607 023142 OUTISR:: 
023142 010046 MOV —- RO, =( SP) ;SAVE RO 
4609 023144 032777 000200 157062 BIT #RDO,@SEL2 78. THE RDO OUT BIT SET? 
4610 023152 001006 BNE 5$ IF YES = Ok TO PROCEED. 
4611 OTHERWISE REPORT SPURIOUS INTERRUPT 
4612 023154 ERRDF 18, £MG18,ERRG2 
4613 023154 104455 TRAP CSERDF | 
4614 023156 WORD 18 


000022 ‘ 
4615 023160 020353 -WORD EMG18 





DMR=-11 FUNCTIONAL TESTS MACY11 wy ehh ge SEQ 0100 
P11 29=JUL=81 11:32 L INTERRUPT HANDLING ROUTINES 
023162 015124 «WORD ERRG2 
OS31Se 000137 023566 - JMP 60$ 
023170 032777 000001 157036 BIT AMCNTRL ,@SEL2 ;IS THIS A CONTROL OUT 
023176 001452 BEQ $ 3IF NOT = PROCESS BA/CC OUT 
0232 032777 001000 157032 BIT #HALTC ,@SEL6 31S THIS CONTROL OUT A HALT? 
023206 001013 BNE 10$ sIF IT IS = SEE IF WE SHOULD RESUME. 
023210 032777 000040 157022 BIT ADMRRUN,@SEL6 ;IS THIS DMR RUN MODE ACKNOWLEDGE? 
023216 001407 BEQ 10$ 3; IF NOT = REPORT ERROR 
023220 000137 023616 JMP 65$ sEXIT 
023224 7$: 
023224 ERRDF 9,EMG9,ERRG2 ;UNEXPECTED CONTROL OUT. 
23224 104455 TRAP CSERDF 
023226 00001 «WORD 9 
23230 02004 -WORD EMG9 
023232 015124 «WORD ERRG2 
023234 BR 65$ sEXIT ROUTINE 
023236 10$: 
023236 005737 002354 TST INFLAG ;ARE THE INPUTS DONE? 
023242 001403 BEQ 15$ BR IF NOT 
023244 005737 002356 TST OUTFLG ;ARE THE OUTPUTS DONE? 
OSeses 001146 15$ BNE 60$ sIF YES - ALL DONE, EXIT 
023252 005737 002274 TST RESUME ;I1S A RESUME REQUESTED? 
023256 001414 BEQ 16$ 7IF NOT - BRANCH TO ERROR. 
3260 012777 040000 156744 MOV AMCLR,@SELO : ISSUE A MASTER CLEAR. 
3266 000240 NOP 
023270 000240 NOP 
023272 052777 000100 156734 BIS #IEO,A@SEL2 sRESET INTERRUPT ENABLE (MASTER 
;CLEAR - CLEARS ALL BITS) 
023300 112777 000143 156724 MOVB MIESET!RQI'BASEI. oon Bl ; ISSUE A BASE IN 
023306 000543 BR 65$ ; " 
023310 16$: 
023310 ERRDF 16,EMG16 sERROR - UNEXPECTED HALT. 
023310 104455 TRAP CSERDF 
023312 «WORD 16 
023314 020250 -WORD EMG16 
023316 000000 -WORD 0 
023320 000137 023566 JMP 60$ 
023324 20$: 
023324 005737 002302 TST sARE ne _BUFFERS ey MANAGED? 
023330 001452 BEQ 40$ NE DETERMINE PHYS. ADDR. 
023332 032777 040000 156700 BIT #B1T14,aSEL6 is BT 16 OF THE PHYSICAL ADDR SET? 
I.£. BUFFER SHOULD BE IN PHYSICAL 
“ADDRESS RANGE: 200000 - 277776) 
023340 001005 E 21$ ;PROCEED - IF BIT SET. 
023342 ERRDF 11,EMG11,ERRG2 
023342 104455 TRAP CSERDF 
023344 000013 «WORD 11 
023346 020116 «WORD EMG11 
023350 015124 «WORD ERRG2 
023352 000505 BR 60$ 
023354 21$: 
023354 042777 140000 156656 BIC #B1T15'BIT14, aSEL6 ;CLEAR THE EXTENDED ADDRESS BITS. 
023362 017702 156650 MOV @SEL4,R2 : SAVE BITS 0-15 OF THE PHYSICAL ADDRESS. 
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4672 023366 042702 017777 BIC —-#17777,R2 ;SAVE ONLY PAGE ADDRESS BITS. 
4673 023372 042777 160000 156636 BIC #160000,aSEL4  3CLEAR PAGE ADDRESS BITS_IN SEL4 
467% DETERMINE PAGE # FOR VIRTUAL ADDRESS. 
4675 023400 005702 TST —R2 SIS THIS PAGE 3? 
4676 023402 001004 BNE 22 ZIF_NOT CHECK FOR OTHER PAGES 
4677 023404 052777 060000 156624 BIS  #60000,aSEL4  ;SET BITS FOR PAGE 3. 
4678 023412 000421 BR 40$ 
4679 023414 228: 
4680 023414 022702 020000 (MP = #20000,R2 :1S THIS PAGE 42 
4681 023420 001004 BNE 3$ F NOT ~ KEEP, CHECKING 
4682 023422 052777 100000 156606 BIS  #100000,aSEL4 SET BITS FOR PAGE 4 
4683 023430 0004612 BR 40$ 
4684 023432 238: 
4685 023432 022702 040000 CMP —-#40000,R2 :1$ THIS PAGE 5? 
4686 023436 001004 BNE 4$ F NOT - MUST BE PAGE 6 
4687 023440 052777 120000 156570 BIS  #120000,aSEL4  :SET BITS FOR PAGE 5. 
4688 023446 000403 BR 40$ 
4689 023450 248: : 
4690 023450 052777 140000 156560 BIS  _#140000,aSEL4 SET BITS FOR PAGE 6. 
4691 023456 40S: 
4692 023456 032777 000004 156550 BIT #RCV,a@SEL2 1S THIS A RECV. BUFFER? 
4693 023464 001023 BNE 50$ ZIF YES ~ PROCESS THE BUFFER. 
4694 023466 005337 002334 DEC — OUTXMT :DECREMENT BA/CC OUT XMIT 
4695 023472 022577 156540 CMP  - (R5)+,@SEL4 31S THE XMIT BUFFER ADDRESS CORRECT? 
4696 023476 001406 BEQ «(418 :IF YES = PROCEED. 
4697 023500 005725 TST (R54 INCR. POINTER FOR ERROR MESSAGE. 
4698 023502 ERRDF 11,£MG11,ERRGB ;IF NOT - ERROR 
4699 023502 104455 TRAP CSERDF 
4700 023504 000013 WORD 11 
4701 023506 020116 “WORD  EMG11 
4702 023510 016062 “WORD — ERRG8 
4703 023512 000425 BR 60$ ZEXIT ROUTINE 
4704 023514 41$: 
4705 023514 022577 156520 CMP (RS)+,aSEL6 1S THE CHAR. COUNT CORRECT? 
4706 023520 001422 BEQ © 60 - EXIT ROUTINE. 
4707 023522 ERROF 12,EMG12,ERRGB IF NOT - ERROR 
4708 023522 104455 TRAP CSERDF 
4709 023524 000014 WORD 12 
4710 023526 020141 “WORD  EMG12 
4711 023530 016062 “WORD — ERRG8 
4712 023532 000415 BR 60$ ZEXIT 
4713 023534 508: 
4714 023534 005337 002332 DEC OUTRCV ;DECREMENT BA/CC OUT RCV 
4715 023540 022477 156472 CMP  —s- (R4)+,@SEL4 «SS THE RCV BUFFER ADDRESS CORRECT? 
4716 023544 001406 BEQ «518 :IF OK - PROCEED 
4717 023546 ERRDF 11, EMG11,ERRG7 
4718 023546 104455 TRAP CSERDF 
4719 023550 000013 WORD 11 
4720 023552 020116 “WORD  EMG11 
4721 023554 015764 “WORD — ERRG? 
4722 023556 005724 TST (R4)+ ;UPDATE POINTER 
4723 023560 000402 BR 60$ ZEXIT ROUTINE 
4724 023562 51$: 
4725 023562 017724 156452 MOV — @SEL6,(R4)+ CHANGE THE CHARACTER COUNT TO WHAT 
4726 :WAS RECEIVED. 


4727 023566 60$: 






























C2DMID. P11 


023636 
023636 
023636 


042777 
012737 


042777 
012600 


000002 


012737 


000002 


002334 
002332 
000100 
177777 
000207 


000001 


156424 
002356 


156410 


002352 
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TST OUTXMT ;HAVE ALL ae | XMITS BEEN DONE? 

BNE 65$ IF NOT, 

TST OUTRCV SHAVE ALL ONE RECEIVES BEEN DONE? 
6s BNE 65$ SIF NOT, CONTINUE 

BIC #IEO,ASEL2 ;CLEAR THE OUTPUT INTERRUPT 
658 MOV #-1,OUTFLG ‘FLAG AS DONE. 

BIC ARDO'CMD,A@SEL2 ;CLEAR THE RDO BIT. 

(SP)+,RO sRESTORE RO 
ENDSRV 
L10020: 


RTI 


DIKE REE KEE EKER EERE EEE EERE REE EEERERERER EH 
FREER EERE EER KEE EERE EEERKEEEEEEREREREEEEER EEE ED 


BGNSRV NOXMEM 
NOXMEM: : 
MOV #1 ,.NXMFLG ;SET FLAG IF MEMORY ADDRESSED IS NON-EXISTENT. 
ENDSRV 


L10021: 
RTI 


a a a es 
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4755 -SBTTL DROP UNIT SECTION 


4757 BU 
4758 3/ THE DROP=UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 


:/ TO NO LONGER BE TESTED. 
4760 SAITIIITITTAATATT TATA AAT TTA AAA 


4762 023640 BGNDU 
4763 023640 L$DU: : 


4765 023640 BRESET : ISSUE UNIBUS RESET TO CLEAN UP 

4766 023640 104433 TRAP C$RESET 

4767 023642 PRINTF #FMDROP,LOGDEV 

4768 023642 013746 002370 MOV LOGDEV,-(SP) 

4769 023646 012746 023670 MOV #FMDROP ,=(SP) 

4770 023652 012746 000002 MOV #2,~-(SP) 
023656 010600 SP,RO 


| 
| 
—— 


3660 
4773 023662 062706 000006 ADD #6,SP 


4775 023666 ENDDU 
4776 023666 L10022: 
4777 023666 104453 TRAP C$DU 


4780 023670 047045 040445 047125 FMDROP: .ASCIZ /%NZAUNIT %D2%A DROPPED/ 
4781 023676 052111 022440 031104 

4782 023704 040445 042040 047522 

4783 023712 050120 042105 000 

4784 023720 - EVEN 
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CZDMID.P11 29-JUL=81 11:32 - DMR CSR VERIFICATION 
efes .SBTTL TEST 1 = DMR CSR VERIFICATION 
4787 Itiiiiiiititiiiiiiii iii iii iii iti itil 
4788 :* TEST 1 = DMR-11 
4789 :* VERIFY THAT ADDRESSING THE 4 UNIBUS CSRS DOES NOT CAUSE A NON- 
cee :* EXISTENT MEMORY TRAP. 
3* 
4792 :* THE DMR IS AN NPR DEVICE RESIDING ON A UNIBUS. COPPRINE CATION 
4793 :* BETWEEN THE MAIN CPU AND THE DMR IS ACCOMPLISHED THROUGH A 
4794 :* SET OF FOUR 16-BIT UNIBUS CONTROL AND STATUS REGISTERS (CSRS). 
4795 :* THE FOUR REGISTERS ARE ASSIGNED ADDRESSES IN THE I/0 PAGE 
pee :* FLOATING ADDRESS SPACE: 76XXX0 = 76XXX6 
** 
4798 :* NOTE: THIS TEST IS REDUNDANT IN THAT STATIC LOGIC TESTS SHOULD 
4799 :* HAVE BEEN RUN BEFORE THESE FREE-RUNNING TESTS WERE STARTED, 
4800 3* THEY SHOULD HAVE DETECTED ANY CSR ADDRESSING PROBLEMS. 
4801 :* BUT JUST IN CASE THOSE STATIC TESTS AREN'T RUN, WE'LL BE SAFE. 
4802 FEAR REE REREEE REE EERE KEKE EEE ERK EERKE EH 
4803 023720 BGNTST 
rie! 023720 Tl:: 
4806 023720 SETVEC #4,ALOCATE,A4PRIO7 ;SET UP NON -EXISTENT MEMORY TRAP VECTOR. 
4807 023720 012746 000340 MOV #PRIO7,-(SP) 
4808 023724 012746 024042 MOV MLOCATE ,-(SP) 
4809 023730 012746 000004 MOV #4 ,-(SP) 
4810 023734 012746 000003 : MOV #3,-(SP) 
4811 023740 104437 TRAP CS$SVEC 
4812 023742 062706 000010 ADD #10,SP 
4813 023746 005037 002352 CLR NXMFLG FLAG USED IN THE TRAP ROUTINE. 
4814 023752 005001 CLR R1 SUSE REGISTER TO REMEMBER WHICH OF THE 
re 3 £4 CSRS WE ARE ADDRESSING. 
4817 33 KKK EEK KEKEREKKKEKEKKEKKEEKEAKRKKKKEEEKKEKAKAKEEEKEKREKEKEKEEEEEK 
4818 ; IF ADDRESSING ANY ONE OF THE CSRS RESULTS IN A TRAP TO VECTOR 04, we TRAP 
4819 : WILL REPORT THE ERROR (SEE INTERRUPT ROUTINE "LOCATE'). OTHERWISE THE 
4820 a REFERENCE IS UNEVENTFUL AND THE DEVICE IS READY FOR FURTHER TESTS 
4821 PAAR EKER EEE EERE EERE EEK REKEEKEREEEEREEEKEEREEKEEEREE EERE EEE 
4822 
4823 023754 005777 156252 TST @SELO TEST THE CSR AT 76XXX0 
4824 023760 012701 000002 MOV #2,R1 :SAVE THE OFFSET OF THE NEXT CSR 
4825 023764 005777 156244 TST @SEL2 TEST THE CSR AT 76XXX2 
4826 023770 012701 000004 MOV #4,R1 sSAVE THE OFFSET OF THE NEXT CSR 
4827 023774 005777 156236 TST @SEL4 sTEST THE CSR AT 76XXX4 
4828 024000 012701 000006 MOV #6,R1 ;SAVE THE OFFSET OF THE NEXT CSR 
4829 024004 005777 156230 TST @aSEL6 :TEST THE CSR AT 76XXX6 
024010 005737 002352 TST NXMF LG ‘WAS THERE A TRAP? 
4831 024014 001406 BEQ 10$ :IF NOT - EXIT. 
4832 024016 DODU LOGDEV ‘DROP THE DEVICE 
4833 024016 013700 002370 MOV LOGDEV,RO 
4834 024022 104451 TRAP C$DODU 
4835 024024 DOCLN ;DO CLEAN UP = FORCE BACK TO INIT CODE. 
4836 024024 104444 TRAP CS$DCLN 
4837 024026 005037 002352 CLR NXMF LG sRESTORE THE FLAG. 
4838 024032 10$: 
4839 024032 CLRVEC #4 ;RETURN VECTOR 04 TO NORMAL STATE 


4840 024032 012700 000004 MOV #4 ,RO 

























CZDMID.P11 
024036 


024 
4852 024050 
024052 
04052 


024116 
024120 


024226 


10443€ 


104401 


000 
024230 


002352 


002352 
002232 
024147 
000003 


000010 


051104 


042116 


CZDMIDO DMR-11 Nee og TESTS MACY11 attchintiteid 
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051505 


047045 


ENDTST 


BGNSRV LOCATE 


MOV 
TST 
BNE 


ERRDF 


INC 
PRINTX 


10$: 


MOV 
ENDSRV 


EMTO: -ASCIZ 


FMTO: .ASCIZ 


eft {= be 


RO,=(SP) 
NXMF LG 
10$ 


NXMF LG 
#FMTO,R1,CSR(R1) 


(SP)+,RO 


9 
12:42 OOAGE 1 
- DMR CSR VERIFICATION 


s INTERRUPT SERVICE ste 
bones | RO 


06 SEQ 0105 


TRAP CS$CVEC 


110023: 


TRAP CSETST 


CATE:: 


HAVE WE HAD AT LEAST 1 PREVIOUS TRAP? 
SIF YES, DON'T de DECLARING ANOTHER 
:DEVICE FATAL ERROR 
[NON-EXISTENT DEVICE ERROR 


TRAP CSERDF 
« WORD 

«WORD EMTO 
«WORD 0 


;SET THE FLAG 


PRINT THE CSR THAT DOESN'T ag 


ADD #10,SP 


RESTORE RO 


L10024: 
RTI 


ADDRESS ERROR = TRAP 4/ 


/%ZS3%ACSR (SEL%ZD1%A) AT %06%A DOES NOT RESPOND%N/ 


CSR(R1) ,=(SP) 
=(2 
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CZDMID.P11 29-JUL=81 11:32 TEST 2 = ROM C 


res . SBTTL TEST 2 = ROM CHECK 
4890 ae ae he eet oe re ee on ie oe 
4891 é TEST 2 = DMR-11 
4892 ce ROM CRC/CCITT = CHECK ROM POSITION AND CALCULATE CRC/CCITT. THE 
4893 3* LAST 4 BYTES CONTAIN INFORMATION ABOUT THE ROM TO CHECK. THE 1ST 
4894 3* OF THESE BYTES CONTAINS THE ASCII VCRSION NUMBER. THE 2ND BYTE 
4895 3* CONTAINS THE ROM a “ 3RD AND 4TH BYTES CONTAIN A NEGATIVE 
4896 ;* CRC/CCITT WORD FOR THE R 
4897 ho CHIP P ADDRESS RANGE 
4898 5* LOCATION CHIP NO. BYTE ADDRESS RANGE 
4899 3* E03 0 0000 - 1777 
4900 3* E02 1 HIGH 0000 - 1777 
4901 :* E04 2 LOW 2000 - 3777 
4902 3* E01 3 HIGH 2000 - 3777 
4903 zs E05 4 LOW 4000 - 5777 
490% :* E14 5 HIGH 4000 - 5777 
** 
4906 ect ii ti iits IMPORTANT ! FEE EEE EEE settee ee eee eee RRR RE EER EK 
4907 ;* FOR THIS TEST TO RUN CORRECTLY, ENSURE THAT SWITCH 1 AT LOCATION 
4908 :* E85 ON THE M8207 IS ON. IF THIS SWITCH IS OFF, BSEL1 WILL BE 
4909 ;* LOCKED OUT AND THE MAINTENANCE FEATURES WILL NOT BE ENABLED. 
4910 FRI II IOI TOIT TIO SOTO I TOO TOR IOI TOIT IOI III I IASI IAS IN AIS SISA SSSISIS SIS 
4911 te 
4912 :* SUBTEST 1 - ON THE FIRST PASS PRINT THE VERSION 4 IN EACH ROM 
4913 * SUBTEST 2 = GENERATE THE CRC-CCITT IN EACH ROM AND COMPARE IT 
4914 7* IT AGAINST THE CRC BLASTED IN THE ROM 
4915 toad SUBTEST 3 = COMPARE THE Y * # BLASTED IN THE ROM AGAINST THE 
ne 7* EXPECTED ROM # 
** 
4918 Neate BA aS ARENT REA AS 2B States dt 
4919 024230 BGNTST 
4920 024230 T2:: 
4921 024230 BGNSUB 
4922 024230 T2.1: 
4923 024230 104402 TRAP C$BSUB 
4924 024232 022737 000001 002270 CMP #1,STARES 71S THIS THE FIRST PASS? 
4925 024240 001061 BNE 5$ :IF NOT - SKIP THIS SUBROUTINE. 
4926 GET VERSION # FROM EACH ROM AND PRINT IT OUT 
4927 024242 005004 CLR RS A OF THE 1ST ROM 
4928 024244 012705 000001 MOV #1,R5 74 OF NEXT ROM 
4929 024250 012737 001774 002412 MOV #1774,ROMADR T ADDRESS OF BYTE CONTAINING 4 IN ROMS 0 & 1 
4930 024256 PRINTB #FMT1,LOGDEV :MICROCODE VERSION 
4931 024256 013746 002370 MOV LOGDEV,-(SP) 
4932 024262 012746 025204 MOV #FMT1,—(SP) 
4933 024266 012746 000002 MOV #2,-(SP) 
4934 024272 010600 MOV SP RO 
4935 024274 104414 TRAP CS$PNTB 
4936 024276 062706 000006 ADD #6,SP 
4937 024302 1$: 
4938 024302 CALL ‘SROMO ;GET ROM CONTENTS. 
4939 024306 117737 155726 025540 MOVB @BSEL6,REV1 + SAVE THE ASCII REVISION # OF THE ROM 
at 024314 117737 155730 025542 MOVB @BSEL7,REV2 :SAVE THE REV. # OF THE NEXT ROM 
4942 024322 PRINTB #EMT2,R4,#REV1 RE_AREVZ 


4943 024322 012746 025542 MOV #REV2,-(SP) 
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CFDMID. P11 29-JUL=81 11:32 T 2 = ROM CHEC 

4944 024326 010546 MOV R5,-(SP) 

4945 024330 012746 025540 MOV #REV1,-(SP) 

4946 024334 010446 MOV R4,-(SP) 

4947 024336 012746 025253 MOV #FMT2,-(SP) 

4948 0264342 012746 000005 MLV #5,-(SP) 
9 024346 01 Vv P 

4950 024350 104414 TRAP C$PNTB 

tge3 024352 062706 000014 ADD #14,SP 

4953 024356 022705 000005 CMP #5,R5 ARE WE DONE? 

4954 024362 001410 BEQ 5$ TF YES = EXIT 

4955 024364 062704 000002 ADD #2,R4 ; INCR. ROM NUMBERS 

4956 024370 062705 000002 ADD #2,R5 

4957 024374 062737 002000 002412 ADD #2000, ROMADR “ADDRESS OF BYTES CONTAINING NEXT ROM REV 4S. 

4958 024402 000737 BR 1$ 

4959 

4960 024404 

4961 024404 ENDSUB 

4962 024404 L10026: 

4963 024404 104403 TRAP C$ESUB 

4964 

4965 

4966 024406 BGNSLB 

4967 024406 T2.2: 

4968 024406 104402 TRAP C$BSU8 

4969 024410 005037 002344 CLR FLAG USE THE FLAG TO MARK WHEN AN ERRDF 

4970 ‘HAS BEEN DETECTED IN THIS TEST. 

4971 024414 005004 CLR R4 ‘START CRC CHECK WITH ROM 0 

4972 *R4 IS THE ROM #. THE LOCATION FOR THE 

4973 :ROM IS CONTAINED IN THE TABLE ‘ROMLOC’. 

a 024416 005037 002412 CLR ROMADR ‘BEGIN AT ROM ADDRESS 0 

4976 024422 10$: 

4977 0264422 012737 177777 002402 MOV #-1,LOCRC s INITIALIZE CRC WORD FOR THE LOW BYTE 

4978 * CALCULATION. 

4979 024430 012737 177777 002404 MOV #-1,HICRC ‘INIT. CRC WORD FOR THE HIGH BYTE. 

4980 024436 012701 001000 MOV #1000,R1 :COUNTER FOR LOOP TO READ THE ROM CONTENTS 

4981 sAND CALCULATE THE CRC - THE COUNTER IS 512., 

4982 “BECAUSE 2 ADDRESS LOCATIONS ARE READ FOR EACH 

4983 PASS (1.E. THE ROMS ARE 1K X 8 BITS) 

ise 

4986 : BECAUSE A ROM OUT WILL OUTPUT THE ROM CONTENTS (I.E. 16 BITS) 

rps 34 : THIS ROUTINE WILL CALCULATE/CHECK THE CRC 2 ROMS AT A TIME. 

4989 024442 208: 

4990 024442 CALL $ROMO :GET THE ROM CONTENTS 

4991 024446 117737 155566 002406 MOVB @BSEL6,LOWORD :SAVE THE LOW BYTE OF THE ROM CONTENTS. 

4992 024454 117737 155570 002410 MOVB @BSEL7.HIWORD :SAVE THE HIGH BYTE OF THE ROM CONTENTS. 

4993 024462 005237 002412 INC ROMADR s INCREMENT THE ROM ADDRESS POINTER 

4994 024466 CALL $ROMO ‘GET THE CONTENTS OF THE NEXT ROM ADDRESS 

4995 024472 117737 155542 002407 MOVB @BSEL6,LOWORD+1 :SAVE THE NEXT LOW BYTE. 

4996 024500 117737 155544 002411 MOVB @BSEL7,HIWORD+1 ;SAVE THE NEXT HIGH BYTE. 

4997 NOTE: AT THIS POINT LOWORD IS A WORD WHICH 

4998 HAS 2 CONSECUTIVE LOW BYTES OF ROM CONTENTS. 


4999 024506 005237 002412 INC ROMADR 7 INCREMENT THE ROM ADDRESS POINTER 





E 9 
CZDM1D0 DMR-11 ele og TESTS MACY11 ane? ef; Se ke ed r PAGE 109 SEQ 0108 


CZDMID.P11 29-JUL=81 11:32 T 2 = ROM CHE 
5000 024512 005301 DEC R1 ZARE WE FINISHED WITH THESE 2 ROMS? 
sind 024514 001443 BEQ 40% :1F YES, CHECK CRC 
5003 ; CRC/CCITT CALCULATION = CONVERT THE WORD (LOWORD & HIWORD) TO 
sion : A SERIAL STREAM FOR CALCULATION. 
5006 024516 012703 000020 MOV #16. ,R3 316 BITS TO CONSIDER 
5007 024522 25$: 
5008 024522 000241 CLC ;CLEAR THE CARRY 
5009 024524 006037 002402 ROR LOCRC ROTATE BITO INTO THE CARRY BIT 
5010 024530 006037 002406 ROR LOWORD ;ROTATE BITO INTO C AND Aa OLD C_INTO BIT15 
5011 SARE THE BITS 15 & BITS 0 THE SAME? 
5012 SIF YES (V IS CLEAR), DON'T DO THE C 
5013 024534 102011 BVC 30$ :NOTE: V_IS THE EXCLUSIVE OR OF BITO. é BIT15. 
5014 024536 012702 102010 MOV #102010,R2 SCRCZECITT POL YNOMIAL 
5015 024542 043702 002402 BIC LOCRC ,R2 
5016 024546 042737 102010 002402 BIC #102010,LOCRC 
5017 024554 050237 002402 BIS R2,LOCRC 
5018 024560 30$: 
5019 024560 000241 CLC :CLEAR THE CARRY 
5020 024562 006037 002404 ROR HICRC SROTATE BIT O INTO C 
5021 024566 006037 002410 ROR HIWORD ROTATE OLD C INTO BiT15 (SIGN) & BITO INTO C 
5022 TARE THE BITS 0 OF HICRC & ee ye 3 os 
5023 024572 102011 BVC 35$ :1F YES (V_IS CLEAR), DON'T DOT 
5024 NOTE: VIS THE EXCLUSIVE OR OF BIT. e BIT15. 
5025 024574 012702 102010 MOV #102010,R2 PCRCZECITT POL YNOMI AL 
5026 024600 043702 002404 BIC HICRC,R2 
5027 024604 042737 102010 002404 BIC #102010, HICRC 
5028 024612 050237 002404 BIS R2,HICRC 
5029 024616 35$: 
5030 024616 005303 DEC R3 DO ALL 16 BITS 
5031 024620 001340 BNE 25$ 
5032 024622 000707 BR 208 GET THE CONTENTS OF THE NEXT 2 ROM ADDRESSES. 
er 024624 40$: 
5035 ; AT THIS POINT WE'VE READ THE CONTENTS AND CALCULATED THE CRC FOR 
5036 3; 2 ROM ROMS (ONE LOW BYTE & ONE HIGH BYTE). ALSO WE*VE READ THE 
ents ; CRC BLASTED INTO THE LAST 2 BYTES OF THE ROM (IN LOWORD/HIWORD) 
5039 024624 005137 002402 COM LOCRC ; COMPLEMENT + CALCULATED CRC . 
5040 024630 023737 002402 002406 CMP LOCRC,,LOWORD 71S THE CRC IN ROM THE SAME AS THE 
5041 ; CALCULATED (Ret 
5042 024636 001427 BEQ 50$ SIF YES - CHECK THE HIGH BYTE CRC (NEXT ROM) 
5043 024640 005737 002344 TST FLAG sHAS AN a ALREADY BEEN DECLARED (REMEMBER 
5044 WE'RE IN A LOOP) 
5045 024644 001007 BNE 41$ 3;1F YES, DON'T BOTHER WITH ANOTHER ERRDF. 
5046 024646 012737 000001 002344 MOV #1 ,FLAG [FLAG THAT ERRDF HAS BEEN DETECTED. 
5047 024654 ERRDF 7,EMT1 ;ROM ERROR 
5048 024654 104455 TRAP CSERDF 
5049 024656 000007 -WORD 7 
5050 024660 025472 -WORD €EMT1 
5051 024662 000000 -WORD 0 
5052 024664 41$: 
5053 024664 PRINTB #FMT3,R4,LOCRC,LOWORD 
5054 024664 013746 002406 MOV LOWORD , = (SP) 


5055 024670 -013746 002402 MOV LOCRC ,~(SP) 








po cen es 
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C2DMID. P11 29-JUL=81 11:32 TEST 2 = ROM CHEC 

5056 024674 010446 MOV R4,=(SP) 
5057 024676 012746 025330 MOV #FMT3,=(SP) 
5058 024702 012746 000004 MOV #4 ,-(SP) 
5059 024 010600 MOV SP, 

5060 024710 104414 TRAP C$PNTB 
5061 24712 062706 000012 ADD #12,SP 
5062 024716 50$: 

5063 024716 005204 INC R4 ;INCR ROM # 

5064 024720 005137 002404 COM HICRC [COMPLEMENT THE CALCULATED CRC FOR THE HI BYTE 
5065 024724 023737 002404 002410 CMP HICRC,HIWORD ;ROM CRC AND CALCULATED CRC THE SAME? 

5066 024732 001427 BEQ 60$ 7IF YES = CHECK THE ROM LOCATIONS. 

sist 4 024734 005737 002344 TST FLAG IWE'RENIN AL eat BEEN DECLARED (REMEMBER 
5069 024740 001007 BNE 51$ IF YES, DON'T BOTHER WITH ANOTHER ERRDF. 

5070 024742 012737 000001 002344 MOV #1,FLAG [FLAG THAT ERRDF HAS BEEN DETECTED. 

5071 024750 ERRDF 7,EMT1 :ROM ERROR 

5072 024750 104455 TRAP CSERDF 
5073 024752 000007 «WORD 7 

5074 024754 025472 «WORD EMT1 
5075 024756 000000 «WORD 0 

5076 024760 51$: 

5077 024760 PRINTB #FMT3,R4,HICRC,HIWORD 

5078 024760 013746 002410 MOV HIWORD ,~(SP) 
5079 024764 013746 002404 MOV HICRC,~(SP) 
5080 024770 010446 MOV R4 ,~-(SP) 
5081 024772 012746 025330 MOV #FMT3,-(SP) 
5082 024776 012746 000004 MOV #4 ,-(SP) 
5083 025002 01 V 2R 
5084 025004 104414 TRAP C$PNTB 
5085 025006 062706 000012 ADD #12,SP 
5086 025012 60$: 

5087 025012 022704 000005 CMP #5,R4 :1F WE'VE DONE ROMS 0-5, WE'RE DONE. 

5088 025016 001403 BEQ 70$ ZEXIT WHEN DONE 

5089 025020 005204 INC R4 CHECK THE NEXT ROM. 

5090 025022 000137 024422 JMP 10$ 

5091 025026 70$: 

5092 

5093 025026 ENDSUB 

5094 025026 L10027: 

eee 025026 104403 TRAP CSE SUB 
5097 025030 BGNSUB 

5098 025030 12.3: 

5099 025030 104402 TRAP C$B8SUB 
5100 025032 005037 002344 CLR FLAG i CLEAR “ve 

5101 025036 005004 CLR R4 ;BEGIN AT ROM 0 

5102 025040 012737 001775 002412 MOV #1775 ,ROMADR TADDRESS OF BYTE CONTAINING ROM # 

5103 025046 10$: 

5104 025046 CALL $ROMO :GET ROM CONTENTS 

5105 025052 117701 155162 MOVB @BSEL6,R1 — THE CONTENTS OF THE LOW BYTE 

5106 ;FOR ROMS 0,2.4 

5107 025056 000402 BR 17$ 

5108 025060 15%: 

5109 025060 117701 155164 MOVB @BSEL7,R? SAVE THE CONTENTS OF THE HIGH BYTE 

5110 zFOR ROMS 1,3,5 

5111 025064 17$: 
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-P11 29-JUL=81 11:32 TEST 2 = ROM CHECK 


D 
2 025064 042701 177760 BIC #*C17,R1 ;CONVERT THE ASCII BYTE TO AN OCTAL WORD. 
R1,R4 4H THIS THE EXPECTED ROM # 


2 :3F YES = OK. 
025074 005737 002344 TST FLAG wets auto BEEN DECLARED «REMEMBER 
00 001007 BNE 18$ IF YES, DON'T BOTHER WITH ANOTHER ERRDF. 
025102 012737 000001 002344 MOV #1 FLAG FLAG THAT ERRDF HAS BEEN DETECTED. 
5 ERRDF 7,EMT2 ROM ERROR 
104455 TRAP CSERDF 
000007 7 


025512 «WORD EMT2 
000000 0 


5 
025120 18$: 
025120 PRINTB #FMT4,<B,ROMLOC (R4)>,R1,R4 
025120 010446 MOV R4,-(SP) 
025122 010146 MOV R1,-(SP) 


-(SP) 
025126 156416 025531 BISB ROMLOC (R4) , (SP) 
025414 MOV MFMT4,-(SP) 
000004 


N 
13 2% 
- ae 


MMNVLNNNNN eee 


BIFARRANYISSSVRARUSLVSSOVAA 
° 
ua 
— 
Ww 
Nm 
S 
~m 
N 
a 


025146 062706 9000012 ADD #12,SP 
025152 20$: 
025152 022704 000005 CMP AS RS ;DID WE FINISH THE LAST ROM? 
30$ :IF YES = SKIP TO THE END 
R4 sPOINT TO THE NEXT ROM # 
000001 BIT #BITO,R4 71S THIS AN ODD # 
5140 025166 001334 BNE 15$ IF YES GO BACK AND READ THE HIGH BYTE 


5142 025170 062737 002000 002412 ADD #2000,ROMAD | ;INCR. ADDRESS POINTER TO NEXT ROM #. 
5143 025176 000723 10$ 


DPV UDUPI SVT SVT ST STV SISTA ST STS STITT IT 
ee ee eR te ek ek a ek ed ed ad od od wd ed 


Ww 
oO 
Oo 
NM 
Ww 
pa 
a 
N 
oO 
Ww 
y 
* 


5146 025200 L10030: 
5147 025200 104403 TRAP C$ESUB 


5149 025202 ENDTST 
5150 025202 L10025: 


51 025202 104401 TRAP CSETST 
025204 047045 040445 044515 FMT1: .ASCIZ /%NZAMICROCODE REVISION IN UNIT%D3%A: 2N/ 


0252 
025242 042045 022463 035101 
063623 . 051101 046517 FMT2: .ASCIZ /%AROMZD2%A - REV. %TANZAROMZD2%A = REV. %T%N/ 


WOONAUS wry 
i>) 
ine) 
Nm Nok N 
-—W 
— 
o 
N 
— 
Nm 
wn 
oO 
wn 
NM 
— 
—_ 
— 


Wr 


025316 042522 027126 022440 
025330 040445 047522 022515 FMT3: .ASCIZ /%AROM%ZD2%A: CALCUATED CRC =%06%A CRC IN ROM =%06%N/ 


SHPARAR BAMA A 
& 
R 
°o 
nm 
> 
NM 
oO 


oO 
N 
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CZDMID.P11 29-JUL=81 11:32 T 2 = ROM CHEC 
5168 025336 031104 040445 020072 
51 025344 040503 041514 040525 
5170 025352 042524 020104 051103 
5171 020103 022475 033117 
5172 02 051103 


5174 025402 046517 036440 047445 
175 025410 022466 000116 
025414 er ert: 022505 031104 FMT4: .ASCIZ /%AEXD2%4 IS ROM %D1%A (SHOULD BE ROM %D1%A)%N/ 


025460 022440 030504 040445 
025466 022451 000116 


025472 051103 026503 041503 EMT1: .ASCIZ /CRC-CCITT ERROR/ 
025500 052111 020124 051105 


044524 EMT2: .ASCIZ /LOCATION ERROR/ 
025520 047117 042440 051122 
025526 051117 000 


025531 003 002 004 ROMLOC: .BYTE 3,2,4,1,5,14. ROM 0 = ROM LOCATION 3 ETC. 
025534 001 005 016 


025540 000000 REV1: -WORD 0O sASCII VALUE OF THE REV. NUMBER 
025542 000000 REV2: -WORD 0 sASCII VALUE OF THE REV. NUMBER 


DPV PVA SATA AT ATTA ISTITUTO TT 
el md ed Lg 
BSQRSRESLSSBLRARATSS BAVA 

Oo 

Nm 

Al 

Ww 

— 

Nm 

oS 

~ 

~“ 

Ww 

— 

= 

R 

Oo 

Ww 

Oo 

wW 


C2DMID. Pl) 


5228 025544 
29 


5232 025544 


5235 025550 
5236 


604 
5249 025610 
5251 025610 


5254 025614 
5255 025614 





29-JUL=81 


004737 


104410 


000072 
105777 
001011 


012746 
012746 
0600 


117701 


004737 


104410 


011070 


154464 


017436 
000001 


000004 
154434 


011070 


9 
CZDMIDO DMR-11 wet og TESTS MACY11 es. ety to 12:42 T OAGE 113 SEQ 0112 


T 3 = MASTER CLEAR AND MICROTEST 


. SBTTL TEST 3 = MASTER CLEAR AND MICROTEST 


eeepnuepneep epee eee eee ae 


(1.E. DMC) 
TTT TTT EC CTOCCACLCLCACALACACALACALAACCACALCACA CASE EASES ESE SESE SAAS AREA A ASSAD SS! 
BGNTST si 
CLEAR :MACRO FOR MASTER CLEAR 
‘xe MACRO EXPANSION **** 
JSR PC, $MSCLR ‘ISSUE A DMR MASTER CLEAR 
pune KKKK 
ESCAPE TST :IF ERROR, BR TO TEST END. 
TRAP  CSESCAPE 
WORD L10031-. 
Tse @BSEL3 :1S THERE A DMR RESPONSE? 
PRINTB #FMG19 :REPORT DEVICE NOT DMR. 
MOV #FMG19,-(SP) 
MOV #1,-(SP) 
NV SP,RO 
TRAP _— C$PNTB 
ADD #4,SP 
in BR 5$ 
; MOVB _— @BSEL3,R1 :SAVE THE RESULT OF THE FIRST MASTER CLEAR. 
CLEAR [MASTER CLEAR AGAIN. 
tees MACRO EXPANSION *#** 
JSR PC, SMSCLR ‘ISSUE A DMR MASTER CLEAR 
juan xen 
ESCAPE TST :1F ERROR, BR TO TEST END. 


eee He TI EERE REE REE REE EEEEE EEE REE REE 


TEST 3 = DMR-11 
MASTER CLEAR 
THIS TEST WILL ISSUE 2 MASTER CLEARS. EACH CALL TO THE ey 
CLEAR ROUTINE WILL ENSURE THAT THE RUN BIT WILL BE SET. ALSO 
THE MASTER CLEAR WILL CAUSE THE DIAGNOSTIC MICROTESTS TO BE 


BIT 13 ONLY ON EVERY OTHER MASTER CLEAR) THE SOF — BIT. 

THIS WILL ENSURE THAT REGARDLESS OF THE POSITION OF THE 

HARDWARE SWITCH, MICROTESTS WILL BE RUN EVERY OTHER MASTER CLEAR. 
WHEN RUNNING THIS TEST, WE EXPECT TO ADD THE RESULTS OF BSEL3 
AFTER EACH MASTER CLEAR. 

BSEL3 = 100 - MICROTESTS DISABLED 

BSEL3 = 200 MICROTESTS RUN SUCCESF 

oanteee OF THE 2 MASTER CLEARS IS NOT 300. AN ERROR IS 


ADDITIONALLY THIS ROUTINE WILL REPORT WHENEVER THE RESULT OF 
BSEL3 IS 0. THIS WILL MEAN THAT THE DEVICE IS NOT A DMR 


TRAP CSESCAPE 


i TS TE 








C2DMID. P11 


025616 
025620 
025624 


025626 


025670 





CZDMIDO DMR-11 aS mt he MACY11 sescrshiinned 


29-JUL-81 


000026 
117702 
060102 


122702 
001404 


104455 
3 


00000 
025646 
015240 


104401 


044515 
051505 


E 114 

= MASTER. “CLEAR AND MICROTEST 
«WORD 110 

:SAVE_THE RESULTS OF THE tt MASTER CLEAR 

ZADD THE RESULTS OF THE 2 C 

TE: ONE SHOULD BE 100 - MICRO TESTS NOT 

SUCCESFULL _ 3 SHOULD BE 200 = MICRO TESTS 

WAS THE MICROTEST COMPLETED? 


:IF YES = OK 
ZMICROTEST NOT COMPLETED 


/MICROTEST NOT COMPLETED/ 





SEQ 0113 


O031-. 


CSERDF 
3 


EMT3 
ERRG3 


CSETST 


9 
CZDMIDO_DMR=11 FUNCTIONAL TESTS MACY11 30A(1052) tp ee + y ay.  DAGE 115 SEQ 0114 


CZDMID.P11 29-JUL=81 11:32 TEST 4 = BASE I 
ra . SBTTL TEST 4 = BASE IN COMMAND 
5281 PERRET RRR ERE REREEEREREEEEEREREREERERERERE EER 
5282 :* TEST 4 = DMR-11 
2283 :* BASE IN COMMANDS 
'* 
5285 ;* SUBTEST 1 = ISSUE A BASE IN = DIR MODE. 
5286 3* ENSURE THAT THE DMR MODE BIT ~ gf. “4 IS SET IN 
5287 * THE MICROCODE SCRATCH PAD 7 AND T THE DDCMP 
5288 3* he k VARIABLES ARE PROPERLY INITIALIZED. 
5289 ;* SUBTEST 2 = ISSUE A BASE IN DMC MODE. 
5290 s* ENSURE THAT THE DMC MODE BIT (BIT 4) + — IN 
5291 s* THE MICROCODE SCRATCH PAD 7 AND THAT THE DDCMP 
2992 7* MESSAGE VARIABLES ARE PROPERLY INITIALIZED. 
* 

5294 DAES IOI IOIOIOIOIOI OOS TT TTT TT TT TTT OTE 
5295 025676 BGNTST 
5296 025676 T4:: 
5297 025676 BGNSUB 
5298 025676 14.1: 
5299 025676 104402 TRAP C$BSUB 
5300 025700 CLEAR ;MACRO FOR MASTER CLEAR COMMAND 
5301 y*x*x%% MACRO EXPANSION **** 
5302 025700 004737 011070 JSR PC, SMSCLR ; ISSUE A DMR MASTER CLEAR 
5303 pawn tk kt 
5304 
5305 025704 ESCAPE TST ;I1F ERROR, BR TO TEST END 
5306 025704 104410 TRAP CSESCAPE 
5307 025706 000244 -WORD 1L10032-. 
5308 ;BASE IN COMMAND WITH NO MAINTENANCE , 
5309 025710 BASEIN 0,BASE,DMR :BASE=BASE TABLE ADDRESS, AND DMR-11 MODE 
5310 ;***% MACRO EXPANSION **** 
5311 025710 004737 011266 JSR $BASE I CALL BASE IN ROUTINE 
5312 025714 000000 PYORD 0 :MAINTENANCE MODE BITS TO SET IN BSEL1 
5313 025716 002640 -WORD BASE BASE TABLE ADDRESS 
5314 025720 000522 “WORD DMR MODE 
5315 pkkee kk kk 
5316 
5317 025722 ESCAPE TST 7 1F ERROR, BR TO TEST END 
5318 025722 104410 TRAP CSESCAPE 
5319 025724 000226 «WORD 110032-. 
5320 025726 SHUTDN 
5321 yx*** MACRO EXPANSION **** 
oa56 025726 004737 012562 JSR PC, SHALT [DMR HALT ROUTINE. 

peake kkk 
5324 025732 132737 000020 002732 BITB #BIT4,BASE+ISP7 :SEE IF THE DMR MODE BIT IS SET IN THE 
5325 DMR SCRATCH PAD “pg 7 (BASE_TABLE 
5326 [LOCATION CONTAINS AN IMAGE OF SP7) 
5327 025740 001004 BNE 10$ [0K IF SET = BR 
5328 025742 ERRDF 20,EMT4 
5329 025742 104455 TRAP CSERDF 
5330 025744 000024 «WORD 20 
5331 025746 026374 -WORD EMT4 
5332 025750 000000 “WORD 0 
5333 025752 10$: 


5334 CHECK MESSAGE EXCHANGE VALUES 


| nnn 


CZDMIDO DMR-11 ele 9 TESTS MACY11 TOMES? 


CZDMID.P11 


025752 


29-JUL=81 


105737 


026421 
026154 


104403 


104410 
000100 
004737 
132737 


001404 
104455 


1:32 


002702 
002703 
002704 
000001 002705 
002706 


011070 


011266 


012562 
000020 002732 


9 
ff te y 42 AGE 116 SEQ 0115 
COMMAND 


T 4 = BASE | 
IN, THE BASE TABLE. 
TSTB —BASE4R #R (MESSAGE RECEIVED) = 0? 
E 20$ ZER RROR IF NON ZERO 
TSTB + BASE+N WN (MESSAGE TRANSMITTED) = 0? 
BNE 20$ TERROR IF NON ZERO 
TSTB  BASE+A : #A (MESSAGE ACKNOWLEDGED) = 0? 
BNE 20$ ‘ERROR IF NON ZER 
CMPB Ss #1, BASE +T : AT (NEXT MESSAGE r TRANSMITTED) = 1? 
BNE 20$ TERROR IF NOT EQUAL TO 1 
TSTB + BASE+X + #X (LAST NRESSAGE TRANSMITTED) = 0? 
BEQ 30$ 
20$: 
ERRDF 20,EMT5,ERRT1 
TRAP — CSERDF 
.WORD 20 
“WORD EMTS 
“WORD ERRT1 
30$: 
ENDSUB 
$ L10033: 
TRAP  C$ESUB 
BGNSUB 
T4.2: 
TRAP —_ C$BSUB 
CLEAR :MACRO FOR MASTER CLEAR COMMAND 
t***® MACRO EXPANSION **« 
JSR PC, $MSCLR t ISSUE A DMR MASTER CLEAR 
panne week 
ESCAPE TST :1F ERROR, BR TO TEST END 
TRAP — CSESCAPE 
.WORD 1L10032-. 
:BASE IN COMMAND WITH NO MAINTENANCE 
BASEIN 0,BASE,0 [AND DMC ‘ 
ieee MACRO EXPANSION **«« 
JSR PC, $BASEI [CALL BASE IN ROUTINE 
.WORD 0 ‘MAINTENANCE MODE BITS TO SET IN BSEL1 
“WORD BASE BASE TABLE ADDRESS 
“WORD 0 :MODE 
punk KaKek 
ESCAPE TST :IF ERROR, BR TO TEST END 
TRAP _— CSESCAPE 
.WORD 110032-. 
SHUTDN 
zee MACRO EXPANSION *xx* 
JSR PC, $HALT [DMR HALT) ROUTINE. 
puake xenk 
BITB #BIT4,BASE+ISP7 :SEE IF THE DMR MODE BIT IS CLEAR IN THE 
[DMR SCRATCH PAD REGISTER 7 (BASE TABLE 
SLOCATION CONTAINS AN IMAGE OF SP7) 
EQ 10$ :0K IF CLEAR - BR 
ERRDF  20,EMT6 


TRAP CSERDF 


9 
CZDMIDO_ DMR-11 set og TESTS MACY11 oon eee? e+ ey + y © 42 MPAGE 117 
C2DMID. P11 29-JUL=81 11:32 - BASE IN COMMAND 
5391 026072 000024 - WORD 
5392 026074 026467 . WORD 
5393 026076 000000 . WORD 
5394 026100 10$: 
5395 3 CHECK MESSAGE EXCHANGE VALUES 
5396 HIN, THE BAS 
5397 026100 105737 002702 TSTB BASE+R AR (MESSAGE RECEIVED) = 0? 
5398 026104 001015 E 20$ ERROR IF NON 
5399 026106 105737 002703 TSTB BASE+N Na J TRANSMITTED) = 0? 
5400 026112 001012 BNE 20$ ERROR IF NON ZERO 
5401 026114 105737 002704 TSTB BASE+A ; MA (MESSAGE ACKNOWLEDGED) = 0? 
5402 026120 001007 BNE 20$ ERROR IF NON ZERO 
5403 026122 122737 000001 002705 CMPB #1 ,BASE+T ;_#T (NEXT MESSAGE # TRANSMITTED) = 
04 026130 001003 BNE 20$ ERROR IF NOT EQUAL TO 1. 
5405 026132 105737 002706 TSTB BASE +X : #X (LAST MESSAGE TRANSMITTED) = 0? 
06 026136 001404 BEQ 30$ 
5407 026140 20$: 
5408 026140 ERRDF 20,EMT5,ERRT1 
5409 026140 104455 TRAP 
5410 026142 000024 «WORD 
5411 026144 026421 . WORD 
5412 026146 026154 . WORD 
5413 026150 O$: 
5414 026150 ENDSUB 
5415 026150 L10034: 
aig 026150 104403 TRAP 
5418 026152 ENDTST 
5419 026152 L10032: 
ase 026152 104401 TRAP 
5422 026154 BGNMSG ERRT1 
5423 026154 ERRT1:: 
5424 026154 105737 002702 TSTB BASE+R :1S aR = 0? 
5425 026160 001413 BEQ 1 20K ~ IF Ps 
5426 026162 PRINTB #FMTS,<B,BASE+R> :PRINT # 
5427 026162 5046 CLR 
5428 026164 153716 00270 B1SB 
5429 026170 012746 026526 MOV 
5430 026174 012746 MOV 
5431 026200 01 MOV 
5432 026202 104414 TRAP 
5433 026204 062706 000006 ADD 
5434 026210 1$: 
5435 026210 105737 002703 TSTB BASE +N 1S #N = Q? 
5436 026214 001413 BEQ 0K ~ IF ZERO 
5437 02621 PRINTB #FMT6,<B,BASE+N> ;PRINT #N 
5438 026216 046 CLR 
5439 0262 153716 00264 BISB 
5440 026224 012746 026557 MOV 
5441 0262 012746 MOV 
5442 026234 0106 MOV 
5443 026236 104414 TRAP 
5444 026240 0627 000006 ADD 
ret 026244 2$: 


SEQ 0116 


20 
EMT6 
0 


CSERDF 


20 
EMTS 
ERRT1 


CSESUB 


CSETST 


-(SP) 
BASE +R, (SP) 
#FMTS,-(SP) 
#2,-(SP) 


#6,SP 


~(SP) 
BASE+2, (SP) 
#FMT6,~(SP) 
#2,~(SP) 


9 
CZDMIDO DMR-11 eh og TESTS MACY11 saath, sf oe i “¢ NPAGE 118 SEQ 0117 


CZDMID.P11 29-JUL-81 11:52 - BASE I 
5447 026244 105737 002704 TSTB BASE+A 31S #A = 0? 
5448 026250 001413 BEQ 3$ 70k = IF ZERO 
5449 026252 PRINTB #FMT7,<B,BASE+A> ;PRINT #A 
5450 026252 005046 CLR -(SP) 
5451 026254 153716 002704 B1SB BASE +A, (SP) 
5452 026260 012746 026610 MOV #FMT7,-(SP) 
5453 026264 012746 000002 MOV #2,~-(SP) 
5454 026270 010600 MOV SP,RO 
5455 026272 104414 TRAP CS$PNTB 
5456 026274 0627 000006 ADD SP 
5457 026300 3$: 
5458 026300 122737 000001 002705 CMPB #1 ,BASE+T 31S #T = 1? 
5459 026306 001413 BEQ 4$ 30K = IF ONE 
5460 026310 PRINTB #FMT8,<B,BASE+T> ;PRINT AT 
5461 026310 CLR -(SP 
026312 153716 002705 BISB BASE+T, (SP) 
5463 026316 012746 026641 MOV #FMT8,-(SP) 
5464 026322 012746 000002 MOV #2,-(SP) 
5465 026326 0600 MOV P 
26330 104414 TRAP 

5467 026332 27 000006 ADD . 
5468 026336 4$: 
5469 026336 105737 002706 TSTB BASE +X 21S wx = 0? 
5470 026342 001413 BEQ 5$ :0K = IF ZERO 
5471 026344 PRINTB #FMT9,<B,BASE+X> ;PRINT Bx 
5472 026344 005046 CLR -(SP) 
5473 026346 153716 002706 BISB BASE +X, (SP) 
5474 026352 012746 026672 MOV #FMT9,-(SP) 
5475 026356 012746 000002 MOV #2,-(SP) 
5476 10600 MOV P 

77 026364 104414 TRAP C$PNTB 
5478 026366 706 000006 ADD #6,SP 
5479 026372 5$: 
5480 026372 ENDMSG 
5481 026372 L10035: 
ores 026372 104423 TRAP CS$MSG 
484 026374 046504 020122 047515 EMT4: .ASCIZ /DMR MODE BIT NOT SET/ 
5485 026402 504 1040 052111 


042 041040 
5486 026410 047040 weS 051440 
5488 026421 104 041504 34348 EMTS: .ASCIZ /DDCMP MESSAGE VARIABLE(S) NOT CORRECT/ 


5493 026456 041440 051117 042522 
5494 026464 000 
5495 Say 104 041515 046440 EMT6: .ASCIZ /DMC MODE - DMR BIT NOT CLEARED/ 


7516 
5499 026516 046103 040505 042522 
5500 026524 000104 


5502 026526 040445 051043 024040 FMTS: .ASCIZ /%AMR (MSG. RCVD) = %D3%N/ 





a 


CZDMIDO DMR=11 wt gS TESTS MACYT1 50AC1052)_ 


CZDMID.P11 


5503 


5509 


MAMMA IUIVIVI 
MAMMA II 
ee a od td etd Ls I I 
OONAURWN—O 


3 


026722 


29-JUL=81 
051515 


000 
026724 


1:32 
027107 
024504 
031504 


021501 


031504 


051040 
036440 
047045 
020116 


022463 
024040 


047045 


FMT6: 


FMT7: 


FMT8: 


FMT9: 


-ASCIZ 


-ASCIZ 


EVEN 


Be ee + 
- BASE | 
eASCIZ /%AAN (MSG. XMIT) 


/%ARA (MSG. ACK) 


/%ART (NEXT XMIT) 


/%ARX (LAST XMIT) 


B 10 
Te: Lag BOAGE 119 
COMMAND 


%D32N/ 


2D 3%N/ 


ZD32N/ 


%D32N/ 


SEQ 0118 


= 


C 10 
CZDMIDO DMR=-11 Ang hs ve TESTS MACY11 saath icacsd i fe 12:42 PAGE 120 SEQ 0119 
CZDMID.P11 29-JUL=81 11:32 ST 5 = DMR COMMANDS 


o2s6 .SBTTL TEST 5 = DMR COMMANDS 
5530 PRR EERE EEE EERE EERE REE REE REE EERE ERERRERERERERERER 
5531 3* TEST 5 = DMR-11 
5532 ;* DMR COMMANDS 
5533 3* SUBTEST 1 = Oe | AN ENABLE EXTENDED ERROR COMMAND AND CHECK THAT 
5534 ;* THE EXT. ENABLE BIT IS SET IS SCRATCH PAD 13. THEN 
a2e? s* tyro A clampeaead ERROR AND CHECK THAT THE ENABLE BIT 
“* 
537 3* SUBTEST 2 = - REP/SEL TIMER VALUE AND SET THE DMR THRESHOLD 
5538 3* ALUES. CHECK THAT THE VALUES ARE CORRECT IN 
5539 se THE BASE TABLE AFTER HALTING THE DMR. 
5540 it 
5541 i* 
5542 ERATE EEE EEE EEE EERE EERE EERE REE ERE 
5543 026724 BGNTST 
5544 026724 TS:3 
5545 026724 BGNSUB 
5546 026724 3.15 
5547 026724 104402 TRAP C$BSUB 
5548 026726 CLEAR sfMACRO FOR MASTER CLEAR COMMAND 
5549 y***x® MACRO EXPANSION **** 
5550 026726 004737 011070 JSR PC, SMSCLR ; ISSUE A DMR MASTER CLEAR 
5551 peek KkKK 
5552 
5553 026732 ESCAPE TST 7 IF ERROR, BR TO TEST END 
5554 026732 104410 TRAP CSE SCAPE 
S22 026734 000330 «WORD 110036-. 
5557 026736 BASEIN ;BASE IN COMMAND WITH LINE UNIT LOOP, 
5558 3**** MACRO EXPANSION **** 
£559 026736 004737 011266 JSR PC, $BASEI CALL BASE IN ROUTINE WITH DEFAULTS 
5590 026742 004000 -WORD LPLU ;SET LINE UNIT LOOP 
5561 026744 002640 -WORD BASE BASE TABLES ADDRESS 
5562 026746 000522 -WORD ODMR :DMR-11 MODE 
5563 penne kkkk 
5 
5565 026750 ESCAPE TST ;1F ERROR, BR TO TEST END 
5566 026750 104410 TRAP CSESCAPE 
5567 026752 000312 «WORD 1L10036-. 
5568 026754 DMRIN EXERR sENABLE EXTENDED ERROR NOTIFICATION 
5569 7****% MACRO EXPANSION **** 
5570 026754 004737 012062 JSR PC, $SDMRIN :CALL DMR MODE INPUT ROUTINE 
5571 026760 000006 -WORD EXERR ; INPUT COMMAND 
5572 026762 000000 -WORD 0O NO SEL4 
5573 026764 000000 «WORD 0O iNO SEL6 
5574 puke kik & 
5575 
5576 026766 ESCAPE TST ;1F ERROR, BR TO TEST END 
5577 026766 104410 TRAP CSESCAPE 
5578 026770 000274 «WORD 110036-. 
5579 026772 SHUTDN sHALT THE DMR 
5580 y**** MACRO EXPANSION **** 
5581 026772 004737 012562 JSR PC, $HALT ;DMR HALT ROUTINE. 
5582 ‘kkk kkk 





5583 026776 ESCAPE TST SIF ERROR, BR TO TEST END 


CZDMIDO DMR=11 FUNCTIONAL HS he MACY11 sath 


C2DMID. P11 





026776 
027000 
027002 
027010 


027024 
027024 


027054 
027054 


027110 


29-JUL-81 
10441C 
000264 
132737 
001005 
104455 
000030 
027574 
000000 
000430 


004737 
004000 


002640 
010522 


104410 
000202 
132737 
001404 
104455 


000030 
100 027574 
000000 


104403 


104402 


000001 


011266 


012062 


012562 


000001 


002736 


002736 


10$: 


DMRIN 
JSR 


ESCAPE 


SHUTDN 
JSR 
ESCAPE 


BITB 


BEQ 
ERRDF 


20$: 
ENDSUB 


BGNSUB 


CLEAR 


D 10 
sty fs 12:42 PAGE 121 SEQ 0120 
ST 5 = DMR COMMANDS 


TRAP Chaar 


WORD 110036-. 
#B1T0,BASE*+I1SP13 ;CHECK EXT ENABLE BIT IN THE BASE TABLE. 
3 IMAGE_OF SCRATCH PAD 13. 

10$ 7BIT SET = OK. 

24 ,EMT7 TERROR EXT ENABLE CLEAR 
TRAP CSERDF 
«WORD 24 
«WORD EMT7 
«WORD 0 

20$ 


LPLU,BASE,RES!DMR ;BASE IN COMMAND WITH RESUME SET. 
y**® MACRO EXPANSION **** 
PC, $BASE! [CALL _BASE IN ROUTINE 
.WORD — LPLU [MAINTENANCE MODE BITS TO SET IN BSEL1 
-WORD BASE [BASE TABLE ADDRESS 
“WORD RES!DMR ;MODE 


panne ReKK 
DXERR DISABLE EXTENDED ERROR NOTIFICATION. 
z****% MACRO EXPANSION **** 
PC, SDMRIN [CALL DMR MODE INPUT ROUTINE 
.WORD DXERR INPUT COMMAND 
-WORD QO NO SEL4 
-WORD 0 zNO SEL6 
pexke eek 
TST 71F ERROR, BR TO TEST END 
TRAP CSESCAPE 
«WORD L10036-. 
sHALT THE DMR 
j***x* MACRO EXPANSION **** 
PC, SHALT [DMR HALT ROUTINE. 
punee KeKK 
TST :IF ERROR, BR TO TEST END. 


TRAP rb ay 
-WORD L10036-. 
#BITO,BASE+ISP13 ;CHECK EXT ENABLE BIT IN THE BASE TABLE. 
; IMAGE OF SCRATCH PAD 13. 


20$ sIF CLEAR OK 
24,EMT7 * ERROR EXT ENABLE SET 
TRAP CSERDF 
. WORD 24 
. WORD EMT7 
WORD 0 
L10037: 
TRAP CS$ESUB 
T5.2: 


TRAP C$BSUB 
MACRO FOR MASTER CLEAR COMMAND 
z**** MACRO EXPANSION **** 


E 10 
CZDMIDO DIAR-11 Nee TESTS MACY11 setahteaesd str tt 12:42 PAGE 122 SEQ 0121 
CZDMID. P11 29-JUL-81 11:32 T 5 = DMR COMMANDS 
5640 027110 004727 011070 JSR PC, SMSCLR ; ISSUE A DMR MASTER CLEAR 
5641 pean ehhh 
5642 
56435 027114 ESCAPE TST 7 IF ERROR, BR TO TEST END 
5644 027114 104410 TRAP CSESCAPE 
et 027116 000146 «WORD 1L10036-. 
5647 027120 BASE IN ;BASE IN COMMAND WITH LINE UNIT LOOP, 
5648 ;**** MACRO EXPANSION **** 
5649 027120 004737 011266 JSR PC, $BASEI [CALL BASE IN ROUTINE WITH DEFAULTS 
5650 027124 004000 .WORD  LPLU + +t LINE UNIT LOOP 
5651 027126 002640 «WORD BASE BASE TABLE ADDRESS 
5652 027130 000522 D DMR “DMR=11 MODE 
5653 purkn ehhh 
5654 
5655 027132 ESCAPE TST 7 1F ERROR, BR TO TEST END 
6 027132 104410 TRAP CSESCAPE 
5657 027134 000130 «WORD 1L10036-. 
5658 027136 DMRIN TIMER,0,54 7SET REP/SELECT TIMER VALUE 
5659 3**** MACRO EXPANSION **** 
5660 027136 004737 012062 JSR SDMRIN [CALL DMR MODE INPUT ROUTINE 
5661 027142 000012 WORD TIMER ; INPUT COMMAND 
5662 027144 000000 «WORD 0 TSEL4 VALUE (OR BITS TO CLEAR IN BSEL6) 
5663 027146 000054 «WORD 54 :SEL6 VALUE (OR BITS TO SET IN BSEL6) 
5664 taeee kekk 
5665 
5666 027150 ESCAPE TST ;1F ERROR, BR TO TEST END 
5667 027150 104410 TRAP CSESCAPE 
vend 027152 000112 «WORD 1L10036-. 
5670 ;SET THRESHOLD VALUES AS FOLLOWS: 
5671 7BSEL4 = NAKS RECEIVED (3) 
5672 7BSELS = NAKS TRANSMITTED (13) 
5673 ;BSEL6 = REP/SEL SENT (15) 
5674 ;BSEL7 = NO BUFFFER (4) 
5675 027154 DMRIN THRESH,5403,2015 
5676 z****® MACRO EXPANSION **** 
5677 027154 004737 012062 JSR PC, SDMRIN ;CALL DMR MODE INPUT ROUTINE 
5678 027160 000013 .WORD THRESH 3; INPUT COMMAND 
5679 027162 005403 «WORD 5403 7SEL4 VALUE (OR BITS TO CLEAR IN BSEL6) 
5680 027164 002015 «WORD 2015 ;SEL6 VALUE (OR BITS TO SET IN BSEL6) 
5681 pakke kkk 
5682 
5683 027166 ESCAPE TST 7; IF ERROR, BR TO TEST END 
5 027166 104410 TRAP CSESCAPE 
5685 027170 00007 «WORD 1L10036-. 
5686 027172 SHUTDN ;HALT THE DMR. 
5687 ;**** MACRO EXPANSION **** 
5688 027172 004737 012562 JSR PC, $HALT [DMR HALT ROUTINE. 
5689 rrr keke 
5690 027176 ESCAPE TST 7 IF ERROR, BR TO TEST END 
5691 027176 104410 TRAP CSESCAPE 
92 027200 000064 «WORD L10036-. 
5693 027202 122737 000054 002715 CMPB #54 ,BASE+PRETIM ; 4 REP/SEL TIME IN BASE TABLE. 
5694 027210 001020 BNE 10$ NOT 54, BR TO ERROR. 
5695 027212 122737 000015 002724 CMPB #15, ,BASE+TH3L ‘CHECK REP. THRESH. IN BASE TABLE. 





F 10 
CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30(1052) ogo yut-81 12:42 PAGE 123 SEQ 0122 
CZDMID.P11  29=JUL=81 11:32 tT 5 = DMR COMMANDS 
56% 027220 001014 BNE 10$ zI1F NOT 15, BR TO ERROR. 
5697 027222 122737 000003 002720 CMPB  —s- #3, BASE* TH1L ; CHECK NAK RCVD. THRESH. IN BASE TABLE. 
5698 027230 001010 BNE 1 F NOT 3, BR TO ER 
5699 027232 122737 000013 002722 (MPR «#13,BASE*TH2L :CHECK NAK SENT THRESH. IN BASE TABLE. 
5700 027240 001004 BNE 10$ :IF NOT 13, BR TO ERROR 
5701 027242 122737 000004 002726 (MPR #4,BASE+TH4L CHECK NO BUF. THRESH. IN BASE TABLE. 
5702 027250 001404 BEQ 208 TIF 4, ALL CHECKS OK = EXIT 
5703 027252 108: 
5704 027252 ERRDF 24, EMT8,ERRT3 
5705 027252 104455 TRAP —_ CSERDF 
5706 027254 000030 .WORD 24 
5707 027256 027625 “wORD EMT8 
5708 027260 027266 "WORD  ERRT3 
5 027262 : 
5710 027262 ENDSUB 
5711 027262 L10040: 
5712 027262 104403 TRAP  C$ESUB 
5713 0272646 ENDTST 
5714 027264 L10036: 
5715 027264 104401 TRAP  CSETST 
5717 027266 BGNMSG ERRT3 
5718 027266 ERRT3:: 
5719 027266 PRINTB #FMG1,aSELO,a@SEL2 ;PRINT SELO AND SEL2 
5720 027266 017746 152742 MOV @SEL2,-(SP) 
5721 027272 017746 152734 MOV @SELO.-(SP) 
5722 027276 012746 016302 MOV #FMG1.-(SP) 
5723 2 012746 MOV #3,-(SP) 
5724 01 MOV P’R 
5725 027310 104414 TRAP cs 
5726 027312 062706 000010 ADD 
5727 027316 PRINTB #FMT11,<B,BASE+ISP13> :PRINT OUT THE IMAGE OF SCRATCH Pad ise 
5728 027316 005046 CLR -(SP) 
5729 027320 153716 002736 BISB _ BASE+ISP13, (SP) 
5730 027324 012746 027662 MOV #FMT11,-(SP) 
5731 027330 012746 000002 MOV #2,-(SP) 
5732 027334 010600 MOV SP.RO 
5733 027336 104414 TRAP $PNTB 
5734 027340 062706 000006 ADD #6,SP 
5735 027344 122737 000054 002715 CMPB =: #54, BASE+PRETIM :IS REP/SEL TIME OK? 
5736 027352 001413 BEOQ 1$ BR IF 
5737 027354 PRINTB #FMT12.<B,BASE+PRETIM> OSRINT IT our. 
5738 027254 005046 CLR -(SP) 

9 027356 153716 002715 BISB BASE *PRETIM, (SP) 
5740 027 012746 027713 MOV #FMT12, ~( 
5741 027 012746 2 MOV #2,-(SP) 
5742 027372 01 MOV : 

5743 027374 104414 TRAP  C$PNTB 

5744 027376 062706 000006 ADD #6,SP 

5745 027402 1$: 

5746 027402 122737 000003 002720 CMPB #3. BASE+TH1L =: 1S. NAK RCVD Ok? 

5747 027410 001413 BEQ ‘BR IF OK. 

5748 027412 PRINTB aris. <B,BASE*THIL> :PRINT IT OUT 

5749 027412 005046 CLR -(SP) 

5750 027414 153716 002720 BISB = BASE*THIL, (SP) 


5751 027420 012746 027750 MOV #FMT13,=(SP) 





es 


CZDMIDO DMR=-11 FUNCTIONAL TESTS 
29-JUL=81 2 


CZDMID.P11 
5752 027424 


5792 027572 


5795 027574 
796 


7646 
5804 027654 


5806 027662 
5807 027670 


012746 
010600 
104414 
062706 


122737 
001413 


001413 


001413 


11: 
000002 


000006 
000013 


027124 


MACY11 30A‘1052) 


2$: 
002722 


3$: 
002724 


4$: 
002726 


5$: 
ENDMSG 
042440 EMT?7: 


046440 EMT8: 


043501 FMT11: 
051440 





BEQ 
PRINTB 


eo #4 ,BASE +TH4L f Ox. 
PRINTB #FMT16,<B, BASE +THaL> PRINT IT OUT 


G 10 
29-JUL“81 12:42 PAGE 124 
TEST 5 = DMR COMMANDS 


#13,BASE+TH2L 


CMPB #15,BASE+TH3L ;3S REP LEVEL OK? 
BEO 4$ 
PRINTB 


;BR IF 


eASCIZ /EXT. ERROR BIT INCORRECT/ 


-ASCIZ /DMR MODE INPUT COMMAND ERROR/ 


-ASCIZ /%AIMAGE OF SP 13 = %D3%N/ 


1S NAK SENT OK? 
#FMT14,<B,BASE*TH2L> ;PRINT IT OUT 


OK. 
#FMT15,<B,BASE+TH3L> ;PRINT IT OUT 


71S NO BUFFER LEVEL OK? 


SEQ 0123 


#2,-(SP) 
S 


#FMT14,=(SP) 


#FMT15,-(SP) 


-(SP) 
BASE +TH4L , (SP) 
#FMT16, (SP) 
SP,RO 
CSPNT 
#6,SP 


C$MSG 


CZDMIDO_ DMR=11 FUNCTIONAL TESTS MACY11 seats 
CZDMID.P11 732 


027676 


29-JUL=81 


oo — 
WW — 
=—tah ss 
ws 

o 

pa 


031504 


036440 
047045 


050105 


047045 


FMT12: 


FMT13: 


FMT14: 


FMT15: 


FMT16: 


H 10 
sft fo 12:42 PAGE 125 
T 5 = DMR COMMANDS 


-ASCIZ 


eASCIZ 


eASCIZ 


eASCIZ 


-ASCIZ 


EVEN 


/%AREP=SEL TIME VALUE = %D32%N/ 


/%ANAK RCVD THRESHOLD = %D3%N/ 


/%ANAK SENT THRESHOLD 


4D 32N/ 


/%AREP SENT THRESHOLD = %D3%N/ 


/%ANO BUFFER THRESHOLD = %D3%N/ 


SEQ 0124 





———_——— OO '"' 
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| CZDMIDO_DMR=11_ FUNCTIONAL TESTS MACY11 30A(1052) te eee le: . 1 OACE 126 SEQ 0125 
CZDMID.P11 29=JUL-81 11:32 TEST 6 = CONTROL IN COMMAND 
at . SBTTL TEST 6 = CONTROL IN COMMAND 
5842 LOR REA AAA E REAR EEE TEE A EATER REAR E AEA AEE EEE TERETE EE Te 
5845 ;* TEST 6 = DMR-11 
5844 :* CONTROL IN COMMAND TEST 
5845 :* SUBTEST 1 = CONTROL IN, “FULL DUPLEX, DDCMP MODE. ENSURE THAT 
5846 2@ hg HALF =DUPLEX BIT Is CLEAR IN THE MODEM STATUS WORD, 
5847 o* ALSO ENSURE THAT DDCMP MODE BIT IS SET IN SCRATCH PAD 7. 
reer: 3* SUBTEST 2 <= CONTROL, IN. HALF DUPLEX. ENSURE THAT THE HALF DUPLEX 
5850 ;* SUBTEST 3 - ‘Vain y IN, MAINTENANCE MODE. ENSURE THAT MAINT. MODE 
5851 3* BIT IS SET IN SCRATCH PAD 7. 
5852 :* SUBTEST 4 = CONTROL IN USING SELECTED LOOPBACK. ISSUE A CONTROL IN 
5853 7* USING THE USER SELECTED LOOPBACK. IF THE LOOPBACK IS 
5854 3* NOT CORRECT, DMR RUN MODE ACKNOWLEDGE WILL NOT BE 
5855 3* RECEIVED. 
5856 :* 
5857 i* 
5858 {UREA REAR ERAT ARETE EERE AEE EERE RAAEE REAR REAR REE S 
5859 030136 BGNTST 
5860 030136 Té:: 
5861 030136 BGNSUB 
5862 030136 16.1: 
5863 030136 104402 TRAP C$8SUB 
5864 030140 CLEAR ;MACRO FOR MASTER CLEAR 
5865 y**** MACRO EXPANSION **** 
5866 030140 004737 011070 JSR PC, SMSCLR ; ISSUE A DMR MASTER CLEAR 
5867 panke kkk 
5868 
5869 030144 ESCAPE TST : IF ERROR, BR TO TEST END. 
5870 030144 104410 TRAP CSESCAPE 
5871 030146 000404 «WORD L10042-. 
5872 030150 BASEIN sMACRO FOR BASE IN COMMAND 
5873 yx%«« MACRO EXPANSION **** 
5874 030150 004737 011266 JSR PC, $BASEI CALL BASE IN ROUTINE WITH DEFAULTS 
5875 030154 004000 -WORD LPLU [SET LINE UNIT LOOP 
5876 030156 002640 -WORD BASE BASE TABLE ADDRESS 
5877 030160 000522 -WORD ODMR ;DMR-11 MODE 
5878 pakke kkek 
5879 
5880 030162 ESCAPE TST zI1F ERROR, BR TO TEST END. 
5881 030162 104410 TRAP CSESCAPE 
5882 030164 000366 -WORD 110042-. 
5883 030166 CNTRIN sMACRO FOR CONTROL IN (FULL DUPLEX) 
5884 y**e® MACRO EXPANSION **** 
5885 030166 004737 011522 JSR PC, SCNTIN CALL CONTROL IN ROUTINE WITH DEFAULT 
5886 030172 000000 -WORD O 7S5EL6 ~- FULL DUPLEX, RUN MODE, 1 SEC START. 
5887 taeee keke 
5888 
5889 030174 ESCAPE TST ;1F ERROR, BR TO TEST END. 
5890 030174 104410 TRAP CSESCAPE 
ro 030176 000354 «WORD L10042-. 
5893 030200 052777 000057 152024 BIS #RQI !RMODEM, aSELO +t RQI AND READ MODEM COMMAND 
5894 030206 WAIT RDI sWAIT FOR RDI TO BE SET 


5895 s#e®® MACRO EXPANSION **** 








CZDMIDO DMR-11 Nap ihe oe # TESTS MACY11 30A(1052) 


C2DMID. P11 


030274 
030300 
039302 
030304 


030326 


29-JUL=81 
004737 
000000 


032777 
001404 


104455 
000025 
030554 
000000 
004737 


004737 


002640 
010522 


004737 
002000 


104410 
000234 
052777 


1:32 
010276 


000020 


010706 


012562 


000020 002732 


011266 


011522 


000057 


152014 


151704 


29=JUL=-81 
TEST 


6 = CONTROL IN C 


10$: 
WAIT 


JSR 
SHUTDN 
JSR 
ESCAPE 


BITB 
BNE 
ERRDF 


20$: 
ENDSUB 


BGNSUB 


BASE IN 


CNTRIN 


JSR 


ESCAPE 


BIS 
WAIT 


PC, S$WAIT 
«WORD 0 


#BIT4 ,ASELS 
10$ 
21,EMT9 


RQ] 
PC, $CLRQI 


PC, $HALT 
TST 


#B1T4,BASE+ISP7 
21,EMT10 


J_10 
12: a PAGE 127 SEQ 0126 
OMMAND 


sCALL WAIT ROUTINE 
[FLAG THAT WE'RE WAITING = RDI 
Pehelahel 
TIS THE HDX yt SET IN “MODEM STATUS REG? 
70K = IF BIT CLEAR 
TERROR HDX BIT SET 
TRAP ie 


. WORD 7 


:CLEAR RQI AND WAIT FOR RDI TO CLEAR. 
y**** MACRO EXPANSION **** 

TCLEAR RQI AND WAIT FOR IT TO BE CLEARED. 
pawn KKK 

[HALT DMR 

y***® MACRO EXPANSION **** 

[DMR HALT ROUTINE. 


Kak Kaka 


TIF ERROR, EXIT. 


TRAP CSESCAPE 
«WORD L10042-. 

;1S THE DDCMP RUN BIT SET IN IMAGE OF SP Fe 
ERROR DDCMP RUN BIT me 


RAP CSERDF 

.- WORD 21 

-WORD EMT10 

.- WORD 0 
110043: 

TRAP CS$ESUB 
T6.2: 


TRAP C$8SUB 


LPLU.BASE,,RES!DMR ;BASE IN WITH RESUME. 


pxeee MACRO EX Ang the ween 
[CALL_BASE IN R 


OUT INE 
;MAINTENANCE MODE BITS TO SET IN BSEL1 
BASE TABLE ADDRESS 


puwnn KaKK 


CONTROL IN COMMAND WITH HDX. 


;**** MACRO EXPANSION **** 
:CALL CONTROL IN ROUT INE 
>SEL6 - (DUPLEX, MODE) 


ores aaKK 


PC, $BASEI 

«WORD LPLU 

-WORD BASE 

-WORD RES'DMR MODE 
HDX 

PC, $CNTIN 

-WORD HDX 

TST 


71F ERROR, BR TO TEST END. 


TRAP CSESCAPE 
-WORD L1 


~ pectenanate ane in RQI AND READ MODEM COMMAND 


T FOR RDI TO BE SET 


CZDMIDO_ DMR-11 te TESTS MACY11 scahiaieagl 


CZDMID.P11 


54 
030354 
030354 


29-JUL=81 
004737 
000000 
032777 
001004 


104455 
000025 
030632 
000000 


004737 


104403 


104402 


004737 


104410 
000160 


004737 
004000 


002640 
000522 


104410 
000142 
004737 
000400 
104410 
000130 


004737 


1:32 


010276 


000020 


012562 


011070 


011266 


011522 


012562 


151674 


10$: 


ESCAPE 


CNTRIN 


JSR 


ESCAPE 


SHUTDN 
JSR 


29=JUL=81 
TEST 


PC, SWAIT 
-WORD 0 


Sa mai 
27,EMT11 


PC, $SHALT 


PC, SMSCLR 


TST 


$BASE I 


MAINT 


PC, $CNTIN 
-WORD MAINT 


TST 


PC, $HALT 


HALT THE DMR. 


K 10 
12: a | * PAGE 128 
6 = CONTROL IN COMMAND 


ye**® MACRO EXPANSION *ee® 


i CALL WAIT 


ROUT! 
FLAG THAT WE'RE WAITING — RDI 


Seeee 


SEQ 0127 


71S THE Tat IN" MODEM STATUS REG? 
ERROR HDX BIT CLEAR. 


70K = IF 


yee MACRO EXPANSION **** 


;DMR HALT ROUTINE. 


*xane 
. 


eK 


L10044: 


16.3: 


MACRO FOR MASTER CLEAR 
;***% MACRO EXPANSION **** 
ISSUE A DMR MASTER CLEAR 


-k&kkKe 
© 


KKKK 


IF ERROR, BR TO TEST END. 


;MACRO FOR BASE IN COMMAND 
y**e* MACRO EXPANSION **** 
SCALL BASE IN ROUTINE WITH DEFAULTS 


7SET LINE 
;BAS 


puxnne 


7 IF ERROR, BR TO TEST END. 


. WORD 
MACRO FOR CONTROL IN (MAINT. MODE) 


IT LOOP 
E TABLE ADDRESS 
MODE 


KaKK 


;***x* MACRO EXPANSION **** 
SCALL CONTROL IN ad 


7SEL6 = (DUPLEX, 


PTalalahel 


RaRKK 


1F ERROR, BR TO TEST END. 


7 HALT 
z**** MACRO EXPANSION **** 


2OMR HALT ROUTINE. 


kknt 


TRAP CSERDF 

« WORD 1 

«WORD EMT11 
«WORD 0 

TRAP C$ESUB 
TRAP C$8SUB 
TRAP CSESCAPE 
-WORD L10042-. 
TRAP CSESCAPE 
i L10042-. 
TRAP CSESCAPE 
-WORD 1L10042-. 


DMIDO DMR=11 FUNCTIONAL TESTS MACY11 setehtaameid 
CODMID. Pl) 29-JUL=81 11:32 
6008 030430 ESCAPE 
030430 104410 
6010 030432 000120 
6011 030434 132737 000002 002732 BITB 
6012 030442 001004 E 
6013 030444 ERRDF 
6014 030444 104455 
6015 030446 000025 
6016 030450 
6017 030452 
6018 030454 10$: 
6019 030454 ENDSUB 
6020 030454 
6021 030454 104403 
6022 
6023 030456 BGNSUB 
6024 030456 
6025 030456 104402 
6026 
6027 030460 CLEAR 
6028 
6029 030460 004737 011070 JSR 
6030 
6031 
6032 030464 ESCAPE 
6033 030464 104410 
6034 030466 000064 
6035 030470 005737 002254 TST 
6036 030474 001004 BNE 
6037 030476 052737 004000 030520 BIS 
6038 030504 000403 BR 
6039 030506 1$: 
030506 042737 004000 030520 BIC 
6041 030514 2s: 
6042 030514 CALL 
6043 030520 000000 100$: 
6044 030522 002640 
6045 030524 000522 
6046 030526 ESCAPE 
6047 030526 104410 
6048 030530 000022 
6049 030532 CALL 
6050 
6051 
6052 030536 ESCAPE 
6053 030536 104410 
6054 030540 000012 
rt 030542 CNTRIN 
6057 030542 004737 011522 JSR 
6058 030546 000000 
6059 
030550 ENDSUB 
6061 030550 


6062 030550 104403 


sty (oe 


TST 


«WORD L 
a rami atl 31S THE MAINTENANCE BIT SET IN IMAGE OF SP 7. 
;ERROR = MAINT. BIT NOT SET. 


21,EMT12 


PC, SMSCLR 
TST 


he 
#LPLU,100$ 
2$ 


#LPLU, 100% 


TST 


PC, $SCNTIN 
-WORD 0 


L 10 
12: “ AGE 129 
T 6 = CONTROL IN COMMAND 


«WORD L1 
EXTENDED DMR COMMAND TO SET MAINT. BITS 
:IF NEEDED. THIS WILL ALLOW MODEM LOOPBACK 
IF THE USER REQUESTED IT. 
:1F ERROR, BR TO TEST END. 


MACRO FOR CONTROL IN (FULL DUPLEX) 
z**x* MACRO EX 
CALL CONTROL IN ROUTINE WITH DEFAULT 

:SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START. 


pane wane 


SEQ 0128 


7 IF ERROR, BR TO TEST END. 


TRAP CSESCAPE 
1004 


TRAP > eae 
D EMT12 
0 


1.10045: 
TRAP C$ESUB 


16.4: 
TRAP C$BSUB 


zMACRO FOR MASTER CLEAR 
z**%** MACRO EXPANSION **** 
: ISSUE A DMR MASTER CLEAR 


puke KKKK 


IF ERROR, BR TO TEST END. 


TRAP CSESCAPE 
L10042-. 
1S INTERNAL LOOPBACK REQUESTED? 
IF NOT, BR 
7SET LINE UNIT LOOPBACK. 


CLEAR LINE UNIT LOOPBACK. 


BASE _IN COMMAND. 
SMAINTENANCE BITS (L. U. LOOPBACK?) 
BASE TABLE ADDRESS. 


DMR MODE. 
71F ERROR, BR TO TEST END. 


TRAP CSESCAPE 


TRAP CSESCAPE 
L10042-. 


PANSION **#* 


L10046: 
TRAP CSE SUB 


CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 sesesiatnid” 


CZDMID.P11 


29-JUL=81 11:32 


020124 


020130 
042523 


000130 
020120 

502 
020124 
044502 
020124 
044127 
020116 


027124 


ENDTST 


EMTS: 


EMT10: 


EMT11: 


EMT12: 


mM 10 
off Ge th 12: »* "PAGE 130 SEQ 0129 
OMMAND 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


- EVEN 


- CONTROL IN C 


L10042: 
TRAP CSETST 


/HDX BIT SET WHEN IN FDX/ 


/DDCMP RUN BIT NOT SET/ 


/HDX BIT NOT SET WHEN IN HDX/ 


/MAINT. MODE BIT NOT SET/ 


ectinteedl 





N 10 
CZDMIDO_DMR=11 FUNCTIONAL TESTS MACY11 mnahaned eft fe 12:42 PAGE 131 SEQ 0130 


CZDMID.P11 29-JUL-81 11:32 - MODEM WRITE COMMAND 
y4) .SBTTL TEST 7 = MODEM WRITE COMMAND 
6093 ee erat te me ee a 
6094 3® TEST 7 = DMR-11 
6095 7* MODEM WRITE COMMAND 
6096 :* SUBTEST 1 = WRITE ~~ gig INTO THE MODEM WRITE wae 
6097 3* ENSURE THAT ON THE NEXT MODEM READ THAT THE 
6098 3* MICROCODE RETURNS THE PATTERN WRITTEN INTO BSEL6. 
6099 7* SUBTEST 2 = ATTEMPT TO WRITE BOTH THE HALF=DUPLEX BIT AND THE 
6100 :* RTS HOLD BIT. THE MICROCODE SHOULD NOT ALLOW THIS 
6101 3* TO HAPPEN. WHEN READING THE MODEM STATUS, ONLY 
S106 3* THE HALF=DUPLEX SHOULD BE SET. 
-* 
6104 eetiti titi iti iiiti tit iii iti ti iii ii itititiiitiititi titi titi t tt tities. 
6105 030716 BGNTST 
6106 030716 T7:: 
6107 
6108 030716 BGNSUB 
6109 030716 7.13 
6110 030716 104402 TRAP C$BSUB 
6111 030720 CLEAR sMACRO FOR MASTER CLEAR 
6112 ;**** MACRO EXPANSION **** 
6113 030720 004737 011070 JSR PC, $SMSCLR ; ISSUE A DMR MASTER CLEAR 
6114 pxeke kkk 
6115 
6116 030724 ESCAPE TST ;1F ERROR, BR TO TEST END. 
6117 030724 104410 TRAP CSESCAPE 
6118 030726 000232 -WORD 1L10047-. 
6119 030730 BASE IN ;BASE IN COMMAND. 
6120 pean MACRO EXPANSION **** 
6121 030730 004737 011266 JSR PC, $BASEI CALL BASE IN ROUTINE WITH DEFAULTS 
6122 030734 004900 «WORD LPLU SET LINE UNIT LOOP 
6123 030736 002040 -WORD BASE ;BASE TABLE ADDRESS 
6124 030740 000522 -WORD DMR ;DMR-11 MODE 
6125 panne kkk 
6126 
6127 030742 ESCAPE TST 71F ERROR, BR TO TEST END. 
6128 030742 104410 TRAP CSESCAPE 
04 030744 000214 «WORD 1L10047-. 
6131 030746 012701 000005 MOV #5,R1 ; COUNTER 
6132 030752 012702 031162 MOV AMODEM,R2 ;PATTERN TO WRITE INTO MODEM 
6133 030756 10$: 
6134 030756 012237 030772 MOV (R2)+,15$ ;WRITE PATTERN 
6135 030762 004737 012062 JSR PC, $DMRIN ; ISSUE DMR MODE COMMAND 
6136 030766 000005 -WORD WMODEM SWRITE MODEM COMMNAD 
6137 030770 000377 -WORD 5377 :CLEAR ALL BITS IN BSEL6 
6138 030772 000000 15$: -WORD 0O ;SET THE BITS IN BSEL6 (FROM PATTERN) 
6139 030774 ESCAPE TST ;1F ERROR, BR TO TEST END. 
6140 030774 104410 TRAP CSESCAPE 
vee 030776 000162 «WORD 110047-,. 
6143 031000 052777 000057 151224 BIS #RQI'RMODEM, capng 7SET RQI AND READ MODEM COMMAND 
6144 031006 WAIT RDI WAIT FOR RDI TO BE SET. 
6145 y**** MACRO EXPANSION **** 
6146 031006 004737 010276 JSR PC, $SWAIT CALL WAIT ROUTINE 





ee | 


B 11 
CZDMIDO DMR=11 eee og TESTS MACY11 saint si; Y- 12:42 OPAGE 132 SEQ 0131 
CZDMID.P11 29-JUL=81 11:32 T 7 = MODEM WRITE COMMAND 

3914 031012 00000C «WORD 0 FLAG THAT WE'RE WATTING | oom RDI 

peewee 
6149 031014 ESCAPE TST TIF ERROR, EXIT TEST. 
6150 031014 104410 TRAP CSESCAPE 
6151 031016 000142 «WORD L10047-. 
6152 031020 20$ 
6153 031020 127737 151214 030772 CMPB @BSEL6,15$ DID THE MICROCODE COPY THE BITS? 
6154 031026 001406 BEQ 25$ :1F YES CONT 
6155 1030 013703 030772 MOV 15$,R3 7SAVE THE PATTERN FOR THE ERROR MESSAGE. 
6156 031034 ERRDF 22.—MT13,ERRT2 :WRITE MODEM ERROR 
6157 031034 104455 TRAP CSERDF 
6158 031036 000026 «WORD 22 
6159 031040 031226 «WORD EMT13 
6160 031042 031174 «WORD ERRT2 
616? 031044 25$: 
6162 031044 WAIT RQ] ;CLEAR RQI AND WAIT FOR RDI TO CLEAR. 
6163 z**** MACRO EXPANSION **** 
oie 031044 004737 010706 JSR PC, $CLRQI [CLEAR RQI AND WAIT FOR IT TO BE CLEARED. 

pekee kkk 
6166 031050 ESCAPE TST SIF ERROR, EXIT TEST. 
6167 031050 104410 TRAP CSESCAPE 
6168 031052 000106 «WORD 1L10047-. 
6169 031054 005301 DEC R1 ;DECREMENT COUNTER 
6170 031056 001357 BNE 10$ CONTINUE UNTIL ALL 5 PATTERNS TRIED. 
6171 1060 30$: 
6172 
6173 031060 ENDSUB 
6174 031060 L10050: 
2 2} 031060 104403 TRAP CS$ESUB 
6177 031062 BGNSUB 
6178 031062 17.2: 
tte 031962 104402 TRAP C$8SUB 
6181 031064 DMRIN WMODEM,377,21 z;ATTEMPT TO WRITE MODEM HDX AND RTS. 
6182 ;**** MACRO EXPANSION **** 
6183 1 004737 012062 JSR PC, $DMRIN :CALL Sa MODE INPUT ROUTINE 
6184 031070 000005 «WORD WMODEM COMMAND 
6185 031072 000377 «WORD 377 Sela VALUE (OR BITS TO CLEAR IN BSEL6) 
6186 031074 000021 «WORD 21 7SEL6 VALUE (OR BITS TO SET IN BSEL6) 
6187 keke kk kt 
6188 
6189 031076 ESCAPE TST :1F ERROR, BR TO END. 
6190 031076 104410 TRAP CSESCAPE 
6191 031100 000060 «WORD L10047-. 
6192 031102 052777 000057 151122 BIS #RQI!RMODEM, wae * :SET RQI AND READ MODEM COMMAND. 
6193 031110 WAIT RDI WAIT FOR RDI TO BE SET 
6194 yee MACRO EXPANSION **** 
6195 031110 004737 010276 JSR PC, SWAIT SCALL WAIT ROUT INE 
ois 031114 000000 «WORD 0 7FLAG THAT WE'RE WAITING | FOR RDI 

pakke 
6198 031116 ; ESCAPE TST :IF ERROR, EXIT TEST. 
61 031116 104410 TRAP CSESCAPE 
os 031120 000040 «WORD L1 -. 
6202 031122 122777 000020 151110 CMPB #20,@BSEL6 31S ONLY HDX SET? 


| C11 
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1:32 TEST COMMAND 


CZDMID.P11 


6203 
6205 

06 
6207 


6220 


031152 


031156 
031156 
031156 
031160 
031160 
031160 


031162 
031170 


031174 


031224 
031226 
031234 

031242 
031250 


031252 
031260 


03 
031310 


29-JUL=81 1 
001406 
012703 
104455 


000026 
031226 
031174 


004737 


004737 


000021 


010706 


012562 


000376 
000357 


151036 
031252 
000003 


000010 


So 
Ww 


ARVAR 
—MmrOw 


000001 


T 7 = MODEM WRITE 
BEQ 10$ 
MOV #21,R3 
ERRDF 22,EMT13,ERRT2 


10$: 
WAIT RQI 
JSR PC, $CLRQI 
SHUTDN 
JSR PC, SHALT 
ENDSUB 
ENDTSY 


MODEM: .WORD 0,376,1,252,357 


BGNMSG ERRT2 


:1F YES = OK 
;SAVE THE PATTERN FOR THE ERROR MESSAGE. 


TRAP CSERDF 
D 22 


- WOR 
«WORD EMT13 
-WORD ERRT2 


;CLEAR RQI AND WAIT TUN — TO CLEAR. 
;**** MACRO EXPANSION * 
[CLEAR ROI AND WAIT FOR i TO BE CLEARED. 


punk 


zxee* MACRO EXPANSION **#* 
[DMR HALT ROUTINE. 


juan KKKK 


L10051: 
TR C$ESUB 


L10047: 
TRAP CSETST 


zPATTERN TO WRITE INTO MODEM 


PRINTB #FMT19,R3,<B,@BSEL6> 


ENDMSG 


ERRT2:: 
CLR -(SP) 
BISB optie. (SP) 
MOV R3,-(SP) 
MOV SrAT19. ~(SP) 
MOV #3,-(SP) 
MOV SP, 
TRAP CS$PNTB 
ADD #10,SP 
L10052: 


TRAP C$MSG 


EMT13: .ASCIZ /WRITE MODEM ERROR / 


- EVEN 


FMT19: .ASCIZ /%AWROTE IN BSEL6: %03%A MODEM FORMAT IN BSEL6: %03%N/ 








CZDMIDO DMR=-11 wate -g T STS MA‘¥ 
CZDMID.P11 29-JUL=81 11:32 


6259 031316 020124 047111 041040 
6260 031324 042523 033114 020072 
os0) 031332 047445 022463 000116 





4, SOME? 


off Pt me 


T 7 = MODEM WRIT 


D 11 
12: ~ a "PAGE 134 
COMMAND 





SEQ 0133 


E 11 
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CZDMID.P11 29-JUL-81 11:32 T 8 = NO BUFFER ERROR 
ects .SBTTL TEST 8 = NO BUFFER ERROR 
6268 ERR EERE EEE ERE EES ee 
6269 $ TEST 8 = DMR-11 
6270 ;* SUBTEST 1 = TRANSMIT A BUFFER THREE TIMES WIHOUT ASSIGNING A 
6271 ge oF freee BUFFER. BY ASSIGNING A NO BUFFER THRESHOLD 
6272 s* OF THREE, ENSURE THAT A NO BUFFER ERROR IS RECEIVED 
6273 3* AFTER THE THIRD THRANSMISSION. 
6274 3* SUBTEST 2 = TRANSMIT A BUFFER WITHOUT A RECEIVE BUFFER. 
6275 3* ASSIGN THE NAKS THRESHOLD OF 3 AND A NO BUFFER 
6276 7* THRESHOLD OF 7. CHECK THAT THE NAKS ERROR COUNT IS 
6277 3* THREE AFTER SHUTDOWN. 
6278 LEER REAR EEEAAAAAAARERAREREAAERAEREER EEE EREE EEE 
6279 031340 BGNTST 
6280 031340 T8:: 
6281 031340 BGNSUB 
6282 031340 T8.7: 
6283 031340 104402 TRAF’ C$BSUB 
6284 031342 CLEAR sMACRO FOR MASTER CLEAR 
6285 y*x%%% MACRO EXPANSION **** 
6286 031342 004737 011070 JSR PC, SMSCLR ; ISSUE A DMR MASTER CLEAR 
6287 penne KkeK 
6288 
6289 031346 ESCAPE TST ;1F CRROR, BR TO TEST END. 
6290 031346 104410 TRAP CSESCAPE 
6291 031350 000416 -WORD L10053-. 
6292 031352 BASEIN :MACRO FOR BASE IN COMMAND 
6293 3**** MACRO EXPANSION **** 
6294 031352 004737 011266 JSR PC, $BASEI ;CALL BASE IN ROUTINE WITH DEFAULTS 
6295 031356 004000 WORD LPLU SET LINE UNIT LOOP 
031360 002640 -WORD BASE BASE TABLE ADDRESS 
6297 031362 000522 -WORD DMR :DMR= -11 MODE 
6298 penne kkk 
6299 
6300 031364 ESCAPE TST ;1F ERROR, BR TO TEST END. 
6301 031364 104410 TRAP CSESCAPE 
6302 031366 000400 -WORD 1L10053-. 
6303 031370 CNTRIN MAINT sMACRO FOR CONTROL IN (FULL DUPLEX AND MAINT) 
6304 ;**x%x* MACRO EXPANSION **** 
6305 031370 004737 011522 JSR PC, $CNTIN CALL CONTROL IN ROUTINE 
6306 031374 000400 -WORD MAINT ;SEL6 - (DUPLEX, MODE) 
6307 peake wake 
6308 
6309 031376 ESCAPE TST ;1F ERROR, BR TO TEST END. 
6310 031376 104410 TRAP CSESCAPE 
ort 031400 000366 «WORD 1L10053-. 
6313 ;SET THRESHOLDS: 
6314 SNAKS RCVD = 377 
6315 sNAKS SENT = 377 
6316 ;REP SENT = 377 
6317 -NO BUF = 
6318 031402 DMRIN THRESH,177777,1777 
6319 y**** MACRO EXPANSION **** 
6320 031402 004737 012062 JSR PC, $SDMRIN ;CALL DMR MODE INPUT ROUTINE 


6321 031406 000013 -WORD THRESH ;INPUT COMMAND 
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CZDMID.P11 


031424 
031424 


031436 
031442 


031444 


031524 
031526 
031526 
031534 


031534 
031540 


031542 
031542 


29-JUL=81 
177777 
001777 


032777 
001005 


104455 
000010 
017774 
015124 
000410 


032777 
001004 
104455 
000011 
020040 
015124 
042777 


004737 
000001 


104410 


000003 


012272 


010276 


000207 


000001 


000004 


000207 


010276 


150552 


150542 


150524 


150500 


10$: 


20$: 


30$: 


29-JUL-81 
TEST 8 = NO BUFFER ERROR 

«WORD 177777 
«WORD 1777 

ESCAPE TST 

MOV #3,R0 

BACCIT 

JSR PC, $BACC 
. WORD Ral :BACCT 
«WORD TBUF 
«WORD TCOUNT 

WAIT RDO 

JSR PC, $SWAIT 
«WORD 1 

ESCAPE TST 

DEC RO 

BEQ 10$ 

BIC #RDO! CMD ,@SEL2 

BR 1$ 

BIT ACNTRL ,ASEL2 

BNE 

ERRDF 8,EMG8,ERRG2 

BR 30$ 

BIT A#NOBFR ,@SEL6 

BNE $ 

ERRDF 9,EMG9,ERRG2 

BIC #RDO! CMD ,@SEL2 

WAIT RDO 

JSR PC, $WAIT 
«WORD 1 

ESCAPE TST 


F 11 
12:42 PAGE 136 


- WORD 
: (EITHER CONTROL OUT OR NOBUF /NAKS) 


;CLEAR CONTROL OUT 
EXPECT ANOTHER BACC OUT. 


SEQ 0135 


;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6) 
:SEL6 VALUE (OR BITS TO SET IN BSEL6) 


eee 


:1F ERROR, BR TO TEST END. 


TRAP CSE SCAPE 
«WORD 1L10053-. 
;SET UP A COUNTER 
;BA/CC_IN COMMAND FOR TRANSMIT 
;**** MACRO EXPANSION **** 
CALL ~~, IN ROUTINE WITH DEFAULTS 
/CC_IN TRANSMIT COMMAND 
s¥ RANSMIT eBUFFER ADDRESS 
; TRANSMIT CHARACTER COUNT 
tkake RE 
;WAIT FOR RDO TO BE SET 
;***% MACRO EXPANSION **** 
;CALL WAIT ROUTINE 
FLAG THAT WE*RE WAITING FOR RDO 
puxne ReKK 
:1F RDO NOT SET, BR TO TEST END. 
TRAP CSE SCAPE 
«WORD 1L10053-. 
:DEC COUNTER 
; TRANSMIT FOR 3 TIMES. 
: CLEAR BACC OUT TRANSMIT. 
; TRANSMIT AGAIN 
71S THIS A CONTROL OUT? 
IF YES, PROCEED. 
SEXPECTED CONTROL OUT NOT chain + 
TRAP CSERDF 
-WORD 8 
-WORD EMG8 
-WORD ERRG2 
sEXIT 
71S THE NO at FLAG SET? 
IF YES = OK, PROCEED. 
[WE'RE NOT GETTING EXPECTED RESULT 
TRAP CSERDF 
«WORD 9 
-WORD EMG9 
ERRG2 


;**** MACRO EXPANSION **** 
: CALL WAIT ROUTINE 
LAG THAT WE'RE WAITING FOR RDO 


“ ake 


IF ERROR, BR TO END. 


TRAP CSESCAPE 





G 11 
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CZDMIDO DMR-11 Nagle - 9 TESTS MACY117 30A(1052) 29=JUL-81 SEQ 0136 
CZDMID.P11 29-JUL-81 11:32 TEST 8 = NO BUFFER ERROR 

6378 031544 000222 «WORD 110053-. 
6379 031546 042777 000207 150460 BIC #RDO!'CMD,@SEL2 ;CLEAR BACC OUT. 
6380 031554 SHUTDN sHALT DMR 
6381 ;**** MACRO EXPANSION **** 
6382 031554 004737 012562 JSR PC, SHALT ;DMR HALT ROUTINE. 
6383 penne kaee 
6384 031560 50$: 
6385 031560 ENDSUB 
6386 031560 L10054: 
344 1560 104403 TRAP C$ESUB 
6389 031562 BGNSUB 
6390 031562 T8.2: 
6391 031562 104402 TRAP C$BSUB 
6392 1564 CLEAR ;MACRO FOR MASTER CLEAR 
6393 3**** MACRO EXPANSION **** 
6394 031564 004737 011070 JSR PC, $SMSCLR ; ISSUE A DMR MASTER CLEAR 
6395 peak kkkK 
6396 
6397 031570 ESCAPE TST 7 1F ERROR, BR TO TEST END. 
6398 031570 104410 TRAP CSE SCAPE 
6399 031572 000174 «WORD 110053-. 
6400 031574 BASEIN sMACRO FOR BASE IN COMMAND 
6401 ;**** MACRO EXPANSION **** 
6402 031574 004737 011266 JSR PC, $BASEI ;CALL BASE IN ROUTINE WITH DEFAULTS 
6403 031600 004000 .WORD  LPLU ;SET LINE UNIT LOOP 
6404 031602 002640 -WORD BASE ;BASE TABLE ADDRESS 
6405 031604 000522 -WORD DMR :DMR-11 MODE 
6406 peknk kkk 
6407 
6408 031606 ESCAPE TST :IF ERROR, BR TO TEST END. 
6409 031606 104410 TRAP CSESCAPE 
6410 031610 000156 «WORD 1L10053-. 
6411 031612 CNTRIN sMACRO FOR CONTROL IN (FULL DUPLEX) 
6412 7**** MACRO EXPANSION **** 
6413 031612 004737 011522 JSR PC, $SCNTIN ;CALL CONTROL IN ROUTINE WITH DEFAULT 
oere 031616 000000 -WORD 0O : SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START. 

kkk 
6416 
6417 031620 ESCAPE TST ;1F ERROR, BR TO TEST END. 
6418 031620 104410 TRAP CSESCAPE 
ahh 031622 000144 «WORD 1L10053-. 
6421 ;SET THRESHOLDS: 
6422 : RCVD = 3 
6423 SENT = 3 
6424 sREP SENT = 377 
6425 ;NO BUFFER 
6426 031624 DMRIN THRESH, 1403,3777 
6427 ;**** MACRO EXPANSION **** 
6428 031624 737 012062 JSR PC, $SDMRIN ;CALL DMR MODE INPUT ROUTINE 
6429 031630 000013 -WORD THRESH ; T COMMAND 

. WORD 1403 7SEL4 VALUE (OR BITS TO CLEAR IN BSEL6) 
- WORD 3777 ;SEL6 VALUE (OR BITS TO SET IN BSEL6) 





-kKknk 
. 


week 
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031652 


031654 
031654 


031654 
031660 


031726 


031730 
031730 


29-JUL=81 1 


104410 
000126 
004737 
000040 
002522 
000044 


104455 
000010 
017774 
015124 
000410 
032777 
001004 
104455 
000011 


020040 
015124 


004737 
123727 
001004 
123727 
001404 
104455 


000027 
032026 
031770 


104403 


012272 


010276 


000001 


000004 


012562 
002643 
002646 


150340 


150322 


000003 
000003 


ESCAPE 


BACCIT 
JSR 


10$: 


208: 


30$: 


35$: 


40$: 
ENDSUB 


of; bt ie 
T 8 


H 11 
12:42 PAGE 
- NO BUFFER ERROR 
TST 


;BA/CC 
;**** MACRO EXPANSION **** 


138 


7 IF ERROR, BR TO TEST END. 


TRAP 
. WORD 
IN COMMAND FOR TRANSMIT 


PC, $BACC sCALL BA/CC IN ROUTINE WITH DEFAULTS 
. WORD RQI !BACCT ;BA/CC IN TRANSMIT COMMAND 
-WORD TBUF ; TRANSMIT BUFFER ADDRESS 
-WORD  TCOUNT RANSMIT CHARACTER COUNT 
pase KKKK 
RDO ;WAIT FOR RDO TO BE SET 
y****® MACRO EXPANSION ****® 
PC, SWAIT : CALL WAIT ROUT INE 
-WORD 1 ;FLAG THAT WE'RE WAITING | FOR RDO 
take 
TST + IF RDO NOT SET, BR 10. TEST END. ™ 
.WORD 
#CNTRL,@SEL2 71S THIS A CONTROL OUT? 
$ ;IF YES, PROCEE 
8,EMG8,ERRG2 SEXPECTED CONTROL OUT NOT semis <4 
TORO 
. WORD 
. WORD 
30$ EXIT 
ANOBFR,@SEL6 ;1S THE NO Ze ieee FLAG SET? 
0 zIF YES - OK, CEED. 
9,EMG9,ERRG2 [WE'RE NOT GETTING EXPECTED "um! 
WORD 
“WORD 
. WORD 
; (EITHER CONTROL OUT OR NOBUF /NAKS) 
y**x*x* MACRO EXPANSION **** 
PC, $SHALT :DMR HALT ROUTINE. 
*"kKEKaREK RaKK 
BASE+3,43 NAKS REC. = NO BUFFER = 3? 
IF NOT ERR 
BASE+6,43 NAKS SENT - ag BUFFER = 3? 
40$ ‘IF OK = SKIP 
23,EMT20,ERRT4 
TRAP 
- WORD 
. WORD 
WORM 
L10055: 
TRAP 


SEQ 0137 


CSESCAPE 
L1005%-. 


CSESCAPE 
L10053-. 


CSERDF 
8 


EMG8 
ERRG2 


CSERDF 
9 


EMG9 
ERRG2 


CSERDF 
23 


EMT20 
ERRT4 


CSESUB 


CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052) 


CZDMID.P11 


66 
031766 


031770 


032024 


032026 
032034 


29=JUL=81 11:32 


104401 


032042 


002646 
002643 
016522 
000003 


000010 


ENDTST 


BGNMSG 


ENDMSG 


042440 EMT20: 
000 





I 11 
Up yee 12:42 PAGE 139 
TEST 8 ~ NO BUFFER ERROR 


ERRT4 
PRINTB #FMG7,<B,BASE+3>,<B,BASE+6> 


~ASCIZ /NAKS ERROR/ 
EVEN 


L10053: 
TRAP 


ERRT4:: 


L10056: 


SEQ 0138 


CSETST 


-(SP) 
BASE +6, (SP) 
-(SP) 
BASE +3, (SP) 
#EMG7,-(SP) 
#3,-(SP) 
SP,RO 
C$PNTB 
#10,SP 


C$MSG 


J.11 
PAGE 140 


CZDMiDO DMR=11 See TESTS MACY11 wn ee ot? Oi 12:42 SEQ 0139 
CZDMID.P11 29=JUL-81 11:32 T 9 = NON-EXISTENT MEMORY ERROR 
$213 .SBTTL TEST 9 = NON-EXISTENT MEMORY ERROR 
6517 eT gee he eet te ene ee ice a 
6518 ; TEST 9 = DMR-11 
6519 ie NON-EXISTENT eee (NXM) ERROR CHECK 
6520 ;* PERFORM DMR COMMANDS USING NXM ADDRESSES; VERIFY THAT NXM ERROR IS 
6521 ;* REPORTED IN EACH OF THE FOLLOWING SUBTESTS: 
6522 3* SUBTEST 1 BASE IN RESUME COMMAND - BASE TABLE ADDRESS IS NXM 
6523 3* SUBTEST 2 = BA/CC IN RECEIVE COMMAND = BA/CC IN ADDRESS IS NXM 
6268 ;* SUBTEST 3 = BA/CC IN TRANSMIT COMMAND - BA/CC IN ADDRESS IS NXM 
6526 TREES IOI ISI IIIIIIIOIIUIUIUIOIOIOIUIOIOIUIUIUIOIISISISII OI TOD I TT I I I IE 
6527 032042 BGNTST 
6528 032042 T9:: 
6529 032042 BGNSUB 
6530 032042 T9.1: 
6531 032042 104402 TRAP C$BSUB 
6532 032044 CLEAR sMASTER CLEAR MACRO 
6533 3 **** MACRO EXPANSION **** 
6534 032044 004737 011070 JSR PC, $MSCLR ; ISSUE A DMR MASTER CLEAR 
6535 penne kk 
6536 
6537 032050 ESCAPE TST ;1F ERROR, BR TO TEST END 
6538 032050 104410 TRAP CSESCAPE 
6539 032052 000500 WORD 1L10057-. 
6540 032054 BASEIN ;BASE IN COMMAND - DMR MODE 
6541 y***x% MACRO EXPANSION **** 
6542 032054 004737 011266 JSR PC, $BASEI CALL BASE IN ROUTINE WITH DEFAULTS 
6543 032060 004000 -WORD LPLU SET LINE UNIT LOOP 
6544 032062 00264 -WORD BASE ;BASE TABLE ADDRESS 
6545 2064 000522 -WORD DMR ;DMR-11 MODE 
6546 pakke kek 
6547 
6548 032066 ESCAPE TST ;1F ERROR, BR TO TEST END 
6549 032066 104410 TRAP CSESCAPE 
6550 032070 000462 -WORD 1L10057-. 
6551 032072 SHUTDN HALT 
6552 y***% MACRO EXPANSION **** 
6553 032072 004737 012562 JSR PC, $HALT :DMR HALT ROUTINE. 
6554 peak kkkk 
6555 032076 ESCAPE TST ; IF ERROR, BR TO TEST END. 
6556 032076 104410 TRAP CSESCAPE 
6557 032100 000452 -WORD 110057-. 
6558 032102 012737 000001 002366 MOV ACNTRL ERROR ; THIS FLAG WILL INHIBIT CONTROL OUT 
ea44 ;ERROR REPORTING - BECAUSE WE EXPECT ONE. 
6561 ;BASE IN RESUME COMMAND WITH NXM BASE TABLE. 
6562 032110 BASEIN 0,160000, BIT15!B1T14!RES!DMR 
6563 xx MACRO EXPANSION **** 
6564 032110 004737 011266 JSR PL. war TCALL BASE IN ROUTINE 
6565 032114 000000 0 :MAINTENANCE MODE BITS TO SET IN BSEL1 
6566 032116 160000 “WORD 160000 ;BASE TABLE ADDRESS 
6567 032120 150522 WORD BIT15'BIT14!RES!DMR MODE 
6568 pxaee aRkKK 
6569 
6570 032122 WAIT RDO ;WAIT FOR RDO TO BE SET 
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CZDMID.P11 29-JUL=81 11:32 T 9 = NON-EXISTENT MEMORY ERROR 
6571 ;**e% MACRO EXPANSION **** 
6572 032122 004737 010276 JSR PC, $SWAIT i CALL WAIT ROUTINE 
oof? 032126 000001 -WORD 1 LAG THAT WE'RE WAITING | von RDO 
hee. 
6575 032130 032777 000001 150076 BIT ACNTRL ,@SEL2 71S THERE A CONTROL ouT “REPORTED ? 
6576 032136 001005 BNE 10$ IF YES, PROCEED. 
6577 032140 ERRDF 8,EMG8,ERRG2 EXPECTED CONTROL OUT 
6578 032140 104455 TRAP CSERDF 
6579 032142 000010 «WORD 8 
6580 032144 017774 -WORD EMG8 
6581 032146 015124 «WORD ERRG2 
6582 032150 000410 BR 20$ sEXIT 
6583 032152 10$: 
6584 032152 032777 000400 150060 BIT ANXM,,@SEL6 31S THE NXM FLAG SET? 
6585 032160 001004 BNE 20$ ZIF YES = ERROR REPORTED CORRECTLY 
6586 032162 ERRDF 9,EMG9,ERRG2 UNEXPECTED CONTROL OUT RECEIVED 
6587 BeSier 104455 TRAP _— 


2 0040 EMG9 
6590 032170 015124 208 -WORD  ERRG2 
6592 032172 042777 000207 150034 BIC #RDO!CMD,@SEL2 ;CLEAR RDO AND THE COMMAND BITS 


6593 032200 005037 002366 CLR ERROR ;ALLOW ERROR REPORTING 

6594 032204 ENDSUB 

6595 032204 L10060: 

6258 032204 104403 TRAP CS$ESUB 
6598 032206 BGNSUB 

6599 032206 19.2: 

6600 032206 104402 TRAP C$8SU8 
6601 032210 CLEAR ;MACRO FOR MASTER CLEAR 

6602 3**** MACRO EXPANSION **** 

6603 032210 004737 011070 JSR PC, $MSCLR ; ISSUE A DMR MASTER CLEAR 

6604 puenk kkk 

6605 

6606 032214 ESCAPE TST ;1F ERROR, BR TO TEST END. 

6607 032214 104410 TRAP CSESCAPE 
6608 032216 000334 «WORD 1L10057-. 
6609 032220 BASEIN ;MACRO FOR BASE IN COMMAND 

6610 3**** MACRO EXPANSION **** 

6611 032220 004737 011266 JSR PC, S$BASEI ;CALL BASE IN ROUTINE WITH DEFAULTS 

6612 032224 004000 -WORD LPLU :SET LINE UNIT LOOP 

6613 032226 002640 -WORD BASE BAS E TABLE ADDRESS 

6614 032230 000522 «WORD ODMR :DMR=11 MODE 

6615 pakke keek 

6616 

6617 032232 ESCAPE TST 7 1F ERROR, BR TO TEST END. 

6618 032232 104410 TRAP CSESCAPE 
6619 032234 000316 eWORD 1L10057-. 
6620 032236 CNTRIN sMACRO FOR CONTROL IN (FULL DUPLEX) 

6621 3**** MACRO EXPANSION **** 

6622 032236 004737 011522 JSR PC, SCNTIN ;CALL CONTROL IN ROUTINE WITH DEFAULT 

6623 032242 000000 -WORD 0 ;SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START. 

6624 puaee akee 

6625 


6626 032244 ESCAPE TST :1F ERROR, BR TO TEST END. 
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6627 032244 104410 TRAP cmeseee 
6628 032246 0003 -WORD 110057. 
7404 032250 012737 000001 002366 MOV ACNTRi,ERROR ; INHIBIT CONTROL OUT ERROR REPORT ING AGAIN. 
6631 anh IN REC. COMMAND WITH NXM 
6632 ADDR = 760000 AND A CHARACTER COUNT = 3. 
6633 032256 BACCIR 160000, B1T15!B1IT14!RCOUNT 
6634 y**%% MACRO EXPANSION **** 
6635 032256 004737 012272 JSR PC, S$BACC CALL BA/CC IN ROUTINE 
6636 032262 000044 ° RQI'BACCR ;BA/CC IN RECEIVE COMMAND 
6637 2264 160000 «WORD 160000 ;BUFFER ADDRESS BITS 0-15 
6638 032266 140044 “WORD B1T15!BI1T14!RCOUNT ;BA BITS 16/17 AND CHAR. COUNT 
6639 pakke kkk 
6640 
6641 032270 BACCIT ;BA/CC IN XMIT 
6642 y**** MACRO EXPANSION **** 
66435 032270 004737 012272 JSR PC, $BACC * CALL BA/CC IN ROUTINE WITH DEFAULTS 
6644 032274 000040 WORD RQI!BACCT ;BA/CC IN TRANSMIT COMMAND 
6645 032276 002522 . WORD TBUF ; TRANSMIT BUFFER ADDRESS 
6646 032300 000044 . WORD TCOUNT ;TRANSMIT CHARACTER COUNT 
6647 punkn kkk he 
6648 
6649 032302 WAIT RDO ;WAIT FOR RDO 
6650 y**%® MACRO EXPANSION **** 
6651 032302 004737 010276 JSR PC, SWAIT :CALL WAIT ROUT INE 
6636 032306 000001 . WORD 1 FLAG THAT WE'RE UATTING | om RDO 
Tkeke 
6654 032310 032777 000001 147716 BIT #CNTRL,@SEL2 1S THERE A CONTROL our "REPORTED ? 
6655 032316 001005 BNE 1 sIF YES, PROCEED. 
6656 032320 ERRDF 8,EMG8,ERRG2 TEXPECTED CONTROL OUT 
6657 032 104455 TRAP CSERDF 
6658 032322 000010 -WORD 8 
6659 032324 017774 -WORD EMG8 
6660 032326 015124 -WORD ERRG2 
6661 32330 000410 BR 20$ EXIT 
6662 032332 10$: 
6663 032332 032777 000400 147700 BIT A#NXM, @SEL6 71S THE NXM FLAG SET? 
6664 032340 001004 E :I1F YES - ERROR REPORTED CORRECTLY 
6665 032342 ERRDF 9,EMG9,ERRG2 S UNEXPECTED CONTROL OUT RECEIVED 
6666 032342 104455 TRAP CSERDF 
6667 032344 000011 -WORD 9 
6668 032346 020040 «WORD EMG9 
rryt4 032350 015124 -WORD ERRG2 
6671 032352 20$: 
6672 032352 042777 000207 147654 BIC #RDO'CMD,A@SEL2 ;CLEAR RDO AND THE COMMAND BITS. 
6673 032360 005037 002366 ERROR ;ENABLE ERROR REPORTING 
6674 032364 ENDSUB 
6675 032364 L10061: 
6676 032364 104403 TRAP CSESUB 
6678 032366 BGNSUB 
6679 032366 19.3: 
6680 032366 104402 TRAP C$BSUB 
6681 032370 CLEAR sMACRO FOR MASTER CLEAR 
6682 y**** MACRO EXPANSION **** 


| 
ee 
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6683 


032370 


032374 


032410 
032412 
032416 
032422 


032424 


032440 
032442 
032446 


032454 
032454 
032460 


032466 
032472 


032474 
032502 
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004737 


11:32 
011070 


011266 


011522 


012272 


000001 _ 


012272 


010276 


000001 


002366 


147532 
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ogo gut-8! SEQ 0142 
= NON-EXISTENT MEMORY ERROR 
JSR PC, $MSCLR ; ISSUE A DMR MASTER CLEAR 
pxxne 
ESCAPE TST :I1F ERROR, BR TO TEST END. 
TRAP  CSESCAPE 
.WORD L10057=. 
BASEIN zMACRO FOR BASE IN COMMAND 
yx MACRO EXPANSION **#* 
JSR $BASE 1 ‘CALL BASE IN ROUTINE WITH DEFAULTS 
PE ORD LPLU :SET LINE UNIT LOOP 
“WORD BASE BASE TABLE ADDRESS 
-WORD DMR :DMR-11 MODE 
puKne xRaenek 
ESCAPE TST :1F ERROR, BR TO TEST END. ” 
TRAP _ CSESCAPE 
.WORD 1L10057-. 
CNTRIN zMACRO FOR CONTROL IN (FULL DUPLEX) 
ix MACRO EXPANSION *##« 
JSR PC, $CNTIN SCALL CONTROL IN ROUTINE WITH DEFAULT 
.WORD 0 SSEL6 - FULL DUPLEX, RUN MODE, 1 SEC START. 
PR kelahel Kakk 
ESCAPE TST :I1F ERROR, BR TO TEST END. 
TRAP  CSESCAPE 
.WORD 110057-. 
BACCIR :BA/CC IN RCV 
:**** MACRO EXPANSION ***« 
JSR PC, $BACC ‘CALL BA/CC IN ROUTINE WITH DEFAULTS 
.WORD RQI'!BACCR 7BA/CC IN RECEIVE COMMAND 
.WORD RBUF — ;RECEIVE BUFFER 
“WORD RCOUNT RECEIVE CHARACTER COUNT 
pakke week 
ESCAPE TST z1F ERROR, BR TO TEST END. 
TRAP  CSESCAPE 
.WORD £10057-. 
MOV #CNTRL,ERROR  ; INHIBIT CONTROL OUT ERROR REPORTING AGAIN. 
sBA/CC_IN XMIT COMMAND WITH NXM BUFFER 
“ADDRESS (760000) AND A CHAR. COUNT = 1 
BACCIT 160000, BIT15!BIT14!1 
xe MACRO EXPANSION **** 
JSR PC, $BACC *CALL BA/CC IN ROUTINE 
.WORD RQI'BACCT :BA/CC IN TRANSMIT COMMAND 
“WORD 160000 ;:BUFFER ADDRESS BITS 0-15 
“ WORD BIT15 16171411 :BA BITS 16 & 17 AND CHAR. COUNT 
kek 
WAIT RDO ;WAIT FOR RDO TO BE SET. 
sx MACRO EXPANSION **« 
JSR PC, $WAIT i CALL WAIT ROUTINE 
.WORD 1 ‘FLAG THAT WE'RE WAITING FOR RDO 
Skee 
BIT #CNTRL,@SEL2 1S THERE A CONTROL our "REPORTED ? 
BNE 10$ :IF YES, PROCEED. 


SS 


ee | 


: 














6760 032552 
6761 032552 
032552 


104455 
000010 
017774 
015124 
000410 
032777 
001004 
104455 
000011 
020040 
015124 
042777 
005037 


104403 


104401 
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000400 147514 


000207 
002366 


147470 


ERRDF 


BIC 
CLR 
ENDSUB 


ENDTST 


sit 





8, EMG8 ,ERRG2 


20$ 
A#NXM, @SEL6 
9,EMG9,ERRG2 


#RDO! CMD ,@SEL2 
ERROR 
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T 9 = NON-EXISTENT MEMORY ERROR 


EXPECTED CONTROL OUT 


sEXIT 
;1S THE NXM FLAG SET? 


:1F YES = ERROR REPORTED CORRECTLY 
[UNEXPECTED CONTROL OUT RECEIVED 


;CLEAR RDO AND THE COMMAND BITS. 
DON'T INHIBIT CONTROL OUT ERRORS 


L10062: 
TRAP 


L10057: 
TRAP 





SEQ 0143 


CSERDF 
8 


EMG8 
ERRG2 


CSERDF 
9 


EMG9 
ERRG2 


CSE SUB 


CSETST 
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10 = TIME OUT ERROR 
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ores . SBTTL TEST 10 = TIME OUT ERROR 

6771 _yseapiemcacimmenintestar Syne Saeagm po as cane ne amare tee gs 

6772 : TEST 10 = DMR-11 

6773 i. TIME OUT = FORCE A TIMEOUT AND VERIFY THAT THE ERROR IS REPORTED 

6774 3* THIS A WILL ALSO USE AN APPROXIMATE TIMER TO DETERMINE IF THE 

ort? a M8207 1 MSEC PROGRAM TIMER IS OUT OF RANGE. 

6777 d euaueqciennnsenqnennconessaeesnuqseeqnnesnenesesnensecasenceesenenees 

6778 032554 BGNTST 

6779 032554 T10:: 

6780 032554 CLEAR sMACRO FOR MASTER CLEAR 

6781 3 **** MACRO EXPANSION **** 

6782 032554 004737 011070 JSR PC, SMSCLR ; ISSUE A DMR MASTER CLEAR 

6783 pakke Keke 

6784 

6785 032560 ESCAPE TST ;1F ERROR, BR TO TEST END. 

6786 032560 104410 TRAP CSESCAPE 

6787 032562 000214 «WORD 1L10063-. 

6788 032564 BASEIN ;MACRO FOR BASE IN COMMAND 

6789 3**** MACRO EXPANSION **** 

6790 032564 004737 011266 JSR PC, $BASEI ;CALL BASE IN ROUTINE WITH DEFAULTS 

6791 032570 004000 -WORD LPLU SET LINE UNIT LOOP 

6792 032572 002640 -WORD BASE sBASE TABLE ADDRESS 

6793 032574 000522 -WORD ODMR :DMR= -11 MODE 

6794 pean kKkke 

6795 

6796 ;SET THRESHOLD VALUES AS FOLLOWS: 

6797 :BSEL4 = NAKS dh A (377) 

6798 ;BSEL5 = NAKS TRANSMITTED (377) 

6799 BSELG = REP/SEL SENT (1) 

6800 ;BSEL7 = NO BUFFFER (377) 

6801 032576 DMRIN THRESH, 177777,177401 

6802 3 *%**x MACRO EXPANSION **** 

6803 032576 004737 012062 JSR PC, SDMRIN ;CALL DMR MODE INPUT ROUTINE 

6804 032602 000013 . WORD THRESH ;] T COMMAND 

6805 032604 177777 «WORD 177777 ;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6) 

6806 032606 177401 - WORD 177401 ;SEL6 VALUE (OR BITS TO SET IN BSEL6) 

6807 peake kkk 

6808 

6809 032610 ESCAPE TST 71F ERROR, BR TO TEST END 

6810 032610 104410 TRAP CSESCAPE 

6811 032612 000164 «WORD 1L10063-. 

6812 032614 DMRIN  TIMER,0,10 ;SET REP/SEL TIMER 

6813 y**** MACRO EXPANSION **** 

6814 032614 004737 012062 JSR PC, SOMRIN ;CALL DMR MODE INPUT ROUTINE 

6815 032620 000012 - WORD TIMER a] T COMMAND 

6816 032622 000000 -WORD 0O ;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6) 

6817 032624 000010 WORD 10 SEL6 VALUE (OR BITS a SET IN BSEL6) 

6818 peek 

6819 

6820 032626 ESCAPE TST 71F ERROR, BR TO TEST END. 

6821 032626 104410 TRAP CSESCAPE 
032630 000146 D 110063-. 


. WOR 
MACRO FOR CONTROL IN (FULL DUPLEX) 
;**** MACRO EXPANSION **** 


032632 CNTRIN 
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032632 
032636 


032654 


032656 
032656 


032674 


032674 
032700 


032702 
032714 
032716 
032724 
032726 
032730 


032730 
032736 


29-JUL=81 1 
004737 
000000 


104410 
000104 


004737 
000001 


104410 
000072 
023727 
003005 


104455 
000023 
020402 
000000 


000423 


032777 
001005 


011522 


012062 


012272 


010276 


002416 011610 


000001 


147276 


“ff 


JSR 


ESCAPE 


DMRIN 
JSR 


BACCIT 
JSR 


BIT 


C 12 
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10 = TIME OUT ERROR 


PC, $CNTIN 
«WORD 0 

TST 
WMODEM,0,BIT4 
PC, $DMRIN 
-WORD WMODEM 
-WORD OQ 
«WORD BIT4 
PC, $BACC 
«WORD RQI!BACC 
«WORD TBUF 
-WORD TCOUNT 
TST 

RDO 

PC, $SWAIT 
-WORD 1 

TST 
COUNT , #5000. 
5$ 

19,EMG19 

25$ 

ACNTRL ,@SEL2 
10$ 


146 SEQ 0145 


CALL CONTROL IN ROUTINE WITH DEFAULT 
7SEL6 = FULL DUPLEX, RUN MODE, 1 SEC START. 
*KEKK eeKK 


:IF ERROR, BR TO TEST END. 
TRAP CSESCAPE 
«WORD L10063-. 


;BLIND THE RECEIVER BY GOING INTO HDX. 
;USE WRITE MODEM COMMAND TO SET HALF DUPLEX. 
;**e*% MACRO EXPANSION **** 
:CALL Pon MODE INPUT ROUTINE 
T COMMAND 


'SEL4 VALUE (OR BITS TO CLEAR IN BSEL6) 
7SEL6 VALUE (OR BITS TO SET IN BSEL6) 


ore KKKK 


;BA/CC_IN XMIT BUFFER 

;****% MACRO EXPANSION **** 

CALL BA/CC IN ROUTINE WITH DEFAULTS 
T ;BA/CC_IN TRANSMIT COMMAND 

; TRANSMIT BUFFER ADDRESS 

; TRANSMIT CHARACTER COUNT 


puke KKKK 


7 IF ERROR, EXIT 
TRAP CSESCAPE 
-WORD 1L10063-. 
:WAIT FOR THE READY OUT. 
;***% MACRO EXPANSION **** 
:CALL WAIT ROUT INE 
SFLAG THAT WE'RE MATTING | ro RDO 
PR Relelal 
IF ERROR, EXIT. 
TRAP CSESCAPE 
-WORD 1L10063-. 
;CHECK THE SOFTWARE TIMER epee 
;THE TIMER VALUE WAS DETERM 
SEMPIRICALLY ON A 11/04, M136, 11/40, 11/70. 
:IF OK = PROCEED 


FARRER KEKE 


TRAP CSERDF 
-WORD 19 
- WORD tnt 


; MSEC PROGRAM TIMER - OUT OF RANGE. 

IF THIS ERROR OCCURS, 7 THE M8207 
MICROPROCESSOR AS FOLLOW 

RESET THE DMR, SCOPE Eu69, PIN & TO VERIFY 
[THAT THE IMSEC TIMER IS OUT OF RANGE. 


FERRARA EH 


31S THIS A CONTROL OUT 
:IF YES, PROCEED. 


D 12 
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6881 032740 ERRDF 8,EMG8,ERRG2 sEXPECTED A CONTROL OUT. 
6882 032740 104455 TRAP _ 


000010 ° 

6884 032744 017774 -WORD EMG8 
6885 032746 015124 «WORD ERRG2 
6886 032750 000410 BR 20$ sEXIT 
6887 032752 10$: 
6888 032752 032777 000002 147260 BIT ATOUT ,A@SEL6 THE ha OUT REPIRTED? 
6889 032760 001004 BNE 20$ ac VES. EXIT 
6890 032762 ERRDF 9,EMG9,ERRG2 [UNEXPECTED ERROR. 
6891 032762 104455 TRAP CSERDF 

032764 000011 9 
6893 032766 020040 -WORD EMG9 
6894 032770 015124 . «WORD ERRG2 
6895 032772 20$: 
6896 032772 SHUTDN 
6897 z**** MACRO EXPANSION **** 
6898 032772 004737 012562 JSR PC, $HALT DMR HALT ROUTINE. 


pakke kee 
032776 25$: 
6902 032776 ENDTST 


6903 032776 L10063: 
6904 032776 104401 TRAP CSETST 
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03 

033010 
033010 
033020 
033022 
033026 


033032 


033034 
03 


004737 


104410 
000150 


004737 
004000 
002640 
000522 
104410 
000132 


004737 
000000 


104410 
000120 


004737 
000044 
002572 
000022 


012737 


011070 


011266 


011522 


012272 


000001 


012272 


002366 
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* MESSAGE TOO 


BSNTST 


CLEAR 
JSR 


ESCAPE 


CNTRIN 


JSR 


ESCAPE 


BACCIR 
JSR 


MOV 


BACCIT 
JSR 


st; Yt 
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48 SEQ 0147 
T 11 = MESSAGE TOO LONG ERROR 
TEST 11 = MESSAGE TOO LONG ERROR 
MBRABAASSAASALALALALALLALASAALALE SESS ESAS ERAS SAS EAA SE SESE SERRA SSSR SSS SES SE 
TEST 11 = DMR-11 
LONG - TRANSMIT A MESSAGE THAT IS TOO LONG FOR THE 
* RECEIVE BUFFER AND VERIFY THAT THE ‘‘TOO LONG’ ERROR IS RECEIVED. 
PRA SBARBASASZASZASAASZALALALALALALALAESLALEL SEALS ESSERE ASRS SSR SARA R SERRA SEES SS 
T113 
;MACRO FOR MASTER CLEAR 
y*%%® MACRO EXPANSION ****% 
PC, $MSCLR ; ISSUE A DMR MASTER CLEAR 
puRee KKK 
TST ;IF ERROR, BR TO TEST END. 
TRAP taneee 
sMACRO FOR BASE IN COMMAND 
y*x%% MACRO EXPANSION **** 
PC, S$BASEI :CALL BASE IN ROUTINE WITH DEFAULTS 
. WORD LPLU 7SET LINE UNIT LOOP 
-WORD BASE ;BASE TABLE ADDRESS 
-WORD ODMR ;DMR-11 MODE 
juan xen 
TST ;IF ERROR, BR TO TEST END. 
TRAP CSESCAPE 
-WORD L1 -. 
sMACRO FOR CONTROL IN (FULL DUPLEX) 
y**x*x* MACRO EXPANSION **** 
PC, SCNTIN ;CALL CONTROL IN ROUTINE WITH DEFAULT 
-WORD 0O 7SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START. 
PRelelatel xexnxe 
TST ; IF ERROR, BR TO TEST END. 
yA are 
RBUF ,RCOUNT/2 ;SET UP THE RECEIVE BUFFER WITH iw BUF . Le 
y**%* MACRO EXPANSION **** 
PC, $BACC > CALL BA/CC IN ROUTINE 
.WORD RQI'!BACCR ;BA/CC IN RECEIVE COMMAND 
-WORD RBUF ;BUFFER ADDRESS BITS 0-15 
-WORD  RCOUNT 12. :BA BITS 16/17 AND CHAR. COUNT 
xkkeatk 
ACNTRL,ERROR ;THIS FLAG WILL DISABLE ANY CONTROL OUT ERROR 
TREPORTING BECAUSE WE ARE INTENTIONALLY 
;CAUSING ONE IN THIS TEST. 
;BA/CC IN XMIT COMMAND 
y**** MACRO EXPANSION **** 
PC, $BACC * CALL BA/CC IN nou ie WITH DEFAULTS 
.WORD RQI!BACCT ;BA/CC IN TRANSMIT COMMAND 
. WORD TBUF : TRANSMIT BUFFER ADDRESS 
. WORD TCOUNT * TRANSMIT CHARACTER COUNT 


puke rene 





F 12 
CZDMIDO DMR=11 ee TESTS MACY11 30A(1052) 29=-JUL=81 12:42 PAGE 149 SEQ 0148 


CZDMID. Pil 29-JUL-81 11:32 TEST 11 = MESSAGE TOO LONG ERROR 
6961 033072 10$: 
6962 033072 WAIT RDO ;WAIT FOR RDO TO BE SET 
6963 ;**%* MACRO EXPANSION **#**# 
6964 033072 004737 010276 JSR PC, $WAIT ;CALL WAIT ROUTINE 
6965 033076 000001 WORD 1 3FLAG THAT WE'RE WAITING FOR RDO 
6966 peenn kkee 
6967 033100 ESCAPE TST ; IF RDO NOT SET, BR TO TEST END. 
6968 033100 104410 TRAP CSE SCAPE 
6969 033102 000054 «WORD 110064-. 
6970 033104 032777 000001 147122 BIT #CNTRL,@SEL2 71S THIS A CONTROL OUT? 
6971 033112 001005 BNE 208 ;IF YES, PROCEED 
6972 033114 ERRDF 8,EMG8,ERRG2 sEXPECTED CONTROL OUT. 
6973 033114 104455 TRAP CSERDF 
6974 033116 000010 «WORD 8 
6975 033120 017774 «WORD EMG8 
6976 033122 015124 «WORD ERRG2 
6977 033124 000410 BR 40$ EXIT 
6978 033126 | 208: 
6979 033126 032777 000020 147104 BIT MTOLONG,A@SEL6 ;1S THE TOO LONG BIT SET? 
6980 033134 001004 BNE 40$ ;1F YES, TEST OK = FINISH UP. 
6981 033136 30$: 
6982 033136 ERRDF 9,EMG9,ERRG2 ;WE"RE NOT GETTING EXPECTED RESULT 
6983 033136 104455 TRAP CSERDF 
6984 033140 000011 «WORD 9 
6985 033142 020040 -WORD EMG9 
ons 033144 015124 «WORD ERRG2 
6988 033146 40$: 
6989 033146 005037 002366 CLR ERROR ;RESTORE ERROR FLAG TO NORMAL STATE. 
6990 033152 SHUTDN [HALT THE DMR. 
6991 ;**** MACRO EXPANSION **** 
6992 033152 004737 012562 JSR PC, $HALT [DMR HALT ROUTINE. 
6993 kkk keke 
6994 
6995 
6996 
6997 033156 ENDTST 
6998 033156 L10064: 
6999 033156 104401 TRAP CSETST 
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CZDMID.P11 29-JUL=81 11:32 T 12 = PROCEDURE ERRORS 
- SBTTL TEST 12 = PROCEDURE ERRORS 
ee See Ue eS a a eee en: eee ee 
:* TEST 12 = DMR-11 
;* PROCEDURE ERRORS - 
3* THE FOLLOWING SHOULD CAUSE THE DMR-11 TO HALT AND RESPOND WITH 
;* A PROCEDURE or OR: 
;* SUBTEST 1 = A SECOND BASE IN COMMAND 
3* SUBTEST 2 = A CONTROL IN BEFORE A BASE IN 
:* SUBTEST 3 = A BA/CC IN BEFORE A BASE IN 
>* SUBTEST 4 = A BA/CC IN RCV WITH A BUFFER LENGTH OF 0 
3* SUBTEST 5 = A BA/CC IN XMIT. WITH A BUFFER LENGTH OF 0 
-* 
DAES ISSO IISIIIIIDIDIISIUIDIUIDIDUDDIDISIIDIUIIUIIIINIUNEIOEEE bE 
033160 BGNTST 
033160 Tl2:: 
033160 BGNSUB 
033160 T12.1: 
033160 104402 TRAP C$BSUB 
033162 CLEAR sMASTER CLEAR MACRO 
;**** MACRO EXPANSION **** 
033162 004737 011070 JSR PC, $MSCLR ; ISSUE A DMR MASTER CLEAR 
pune KKKK 
033166 BASE IN 
;**** MACRO EXPANSION **** 
033166 004737 011266 JSR PC, $BASEI :CALL BASE IN ROUTINE WITH DEFAULTS 
033172 004000 «WORD = LPLU SET LINE UNIT LOOP 
033174 002640 -WORD BASE BASE TABLE ADDRESS 
033176 000522 -WORD DMR ;DMR-11 MODE 
PRelelatal nek 
033200 012737 000001 002366 MOV ACNTRL ERROR :THIS FLAG WILL DISABLE ANY CONTROL OUT ERROR 
REPORTING Boy WE ARE INTENTIONALLY 
;CAUSING ONE IN THIS TEST. 
033206 BASE IN :SECOND BASE IN 
;***% MACRO EXPANSION **** 
332 004737 011266 JSR PC, $BASEI [CALL BASE IN ROUTINE WITH DEFAULTS 
033212 004 -WORD LPLU 7SET LINE UNIT LOOP 
033214 002640 -WORD BASE BASE TABLE ADDRESS 
033216 52 «WORD ODMR ;DMR-11 MODE 
puree RaeKK 
033220 WAIT RDO z:WAIT FOR RDO TO BE SET 
;**** MACRO EXPANSION **** 
033220 004737 010276 JSR PC, $WAIT SCALL WAIT ROUT INE 
033224 000001 «WORD 1 ZFLAG THAT WE'RE WAITING | FOR RDO 
puxke 
033226 ESCAPE TST :1F RDO NOT SET, BR TO. TEST END. 
033226 104410 TRAP CSESCAPE 
3230 000632 -WORD 110065-. 
033232 032777 000001 146774 BIT ACNTRL ,@SEL2 31S THIS A CONTROL OUT? 
033240 00100 BNE 10$ :IF YES, PROCEED. 
033242 ERRDF 8,EMG8,ERRG2 SEXPECTED CONTROL OUT 
033242 104455 TRAP CSERDF 






















H 12 
CZDMIDO DMR-11 Se -g® TESTS MACY11 Pom TNOSe ff (Ss 12:42 PAGE 151 SEQ 0150 
C2DMID. P11 29-JUL=81 11:32 12 = PROCEDURE ERRORS 


7058 033244 00001C . WORD 
7059 033246 017774 -WORD EMG8 
7060 033250 015124 «WORD ERRG2 
7061 033252 000410 BR 15$ EXIT 
7062 033254 10$: 
7063 033254 032777 001000 146756 BIT HHALTC,,@SEL6 31S THE HALT = PROCEDURE ERROR BIT SET? 
7064 033262 001004 BNE 15$ 7IF YES = ERROR REPORTED CORRECTLY 
7065 033264 ERRDF 9,EMG9,,ERRG2 S UNEXPECTED CONTROL OUT RECEIVED 
7066 033264 104455 TRAP CSERDF 
7067 033266 000011 «WORD 9 
7068 033270 020040 -WORD EMG9 
7069 033272 015124 «WORD ERRG2 
7070 033274 15$: 
7071 033274 042777 000207 146732 BIC #RDO'CMD,@SEL2 ;CLEAR RDO AND THE COMMAND BITS 
7072 033302 005037 002366 CLR ERROR ;RESTORE FLAG 
7073 033306 ENDSUB 
7074 033306 L10066: 
a4 033306 104403 TRAP C$ESUB 
7077 033310 BGNSUB 
7078 033310 T12.2: 
ata 033310 104402 TRAP C$BSUB 
7081 033312 CLEAR sMASTER CLEAR MACRO 
7082 3 **** MACRO EXPANSION **** 
7083 033312 004737 011070 JSR PC, $SMSCLR : ISSUE A DMR MASTER CLEAR 
7084 peten kak 
7085 
7086 033316 012737 000001 002366 MOV #CNTRL,ERROR ;THIS FLAG WILL DISABLE ANY CONTROL OUT ERROR 
7087 ;REPORTING io WE ARE INTENTIONALLY 
7088 ;CAUSING ONE IN THIS TEST. 
7089 033324 005037 002260 CLR DMRF LG ;CLEAR FLAG THAT IS SET IN nek tae IN ORDER 
7090 ;TO FLAG THAT A CONTROL T=DMR RUN MODE 
7091 [COMMAND IS EXPECTED (THIS FLAG WAS SET IN 
7092 ;THE PREVIOUS SUBTEST BASEIN) 
7093 033330 CNTRIN :CONTROL IN 
7094 pees MACRO EXPANSION **** 
7095 033330 004737 011522 JSR PC, $SCNTIN ;CALL CONTROL IN ROUTINE WITH DEFAULT 
7096 033334 000000 «WORD O 7SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START. 
7097 pekee eRe 
7098 
7099 033336 WAIT RDO ;WAIT FOR RDO TO BE SET 
7100 3**** MACRO EXPANSION **** 
7101 033336 004737 010276 JSR PC, $SWAIT ;CALL WAIT ROUT INE 
7102 033342 000001 - WORD 1 zFLAG THAT WE*RE WAITING FOR RDO 
7103 pakke RkKS 
7104 023344 ESCAPE TST :I1F RDO NOT SET, BR TO TEST END. : 
7105 033344 104410 TRAP CSESCAPE 
7106 033346 000514 «WORD 110065-. 
000001 146656 BIT #CNTRL,@SEL2 71S THIS A CONTROL OUT? 
BNE 10$ :IF YES - PROCEED. 


ERRDF 8,EMG8,ERRG2 EXPECTED CONTROL OUT 
TRAP et 


EMG8 
«WORD ERRG2 
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CSDMID. P11 29-JUL-81 11:32 T 12 = PROCEDURE ERRORS 
7114 033370 000410 BR 15$ EXIT 
7115 033372 10$: 
7116 033372 032777 001000 146640 BIT #HALTC,@SEL6 if THE HALT = PROCEDURE ERROR BIT SET? 
7117 033400 001004 BNE 15$ YES = ERROR REPORTED CORRECTLY 
7118 033402 ERRDF 9,EMG9,,ERRG2 + ANEXPECTED CONTROL OUT RECEIVED 
7119 033402 10455 TRAP CSERDF 
7120 033404 000011 «WORD 9 
7121 033406 020040 -WORD EMG9 
7122 033410 015124 «WORD ERRG2 
7123 033412 15$: 
7124 033412 042777 000207 146614 BIC #RDO'CMD,@SEL2 ;CLEAR RDO AND THE COMMAND BITS. 
7125 033420 005037 002366 CLR ERROR sRESTORE FLAG 
7126 033424 ENDSUB 
7127 033424 L10067: 
4 $s 033424 104403 TRAP C$ESUB 
7130 033426 BGNSUB 
7131 033426 T12.3% 
4) 36 033426 104402 TRAP C$BSUB 
7134 033430 CLEAR sMASTER CLEAR MACRO 
7135 y**%% MACRO EXPANSION **** 
7136 033430 0604737 011070 JSR PC, SMSCLR + ISSUE A DMR MASTER CLEAR 
7137 puke kkk 
7138 
7139 033434 012737 000001 002366 MOV ACNTRL,ERROR 2 THIS FLAG WILL DISABLE ANY CONTROL OUT ERROR 
7140 REPORTING BECAUSE WE ARE INTENTIONALLY 
7141 + CAUSING ONE IN THIS TEST. 
7142 033442 BACCIR sBA/CC IN RCV. COMMAND 
7143 y**%% MACRO EXPANSION **** 
7144 033442 004737 012272 JSR PC, S$BACC * CALL BA/CC IN ROUTINE WITH DEFAULTS 
7145 033446 000044 . WORD RQI'BACCR ;BA/CC IN RECEIVE COMMAND 
7146 033450 002572 WORD RBUF sRECEIVE BUFFER 
7147 033452 000044 -WORD RCOUNT ;RECEIVE CHARACTER COUNT 
7148 penne 
7149 
7150 033454 WAIT RDO ;WAIT FOR RDO TO BE SET 
7151 ;x*%% MACRO EXPANSION **** 
7152 033454 004737 010276 JSR PC, SWAIT ;CALL WAIT ROUTINE 
7153 033460 000001 . WORD 1 sFLAG THAT WE'RE WAITING FOR RDO 
7154 paki kkk 
7155 033462 ESCAPE TST 7I1F RDO NOT SET, BR TO TEST END. 
7156 033462 104410 TRAP CSESCAPE 
7157 033464 000376 «WORD 110065-. 
7158 033466 032777 00001 146540 BIT ACNTRL ,@SEL2 :1S THIS : CONTROL OUT? 
7159 033474 001005 BNE 10$ sI1F YES - PROCEED. 
7160 033476 ERRDF 8, EMG8,ERRG2 S EXPECTED CONTROL OUT 
7161 033476 104455 TRAP —- CSERDF 
7162 033500 000010 «WORD 8 
7163 033502 017774 -WORD EMG8 
7164 033504 015124 «WORD ERRG2 
7165 033506 000410 BR 15$ EXIT 
7166 033510 10$: 
7167 033510 032777 001000 146522 BIT #HALTC,@SEL6 :1S THE HALT - PROCEDURE ERROR BIT SET? 
7168 033516 001004 BNE 15$ IF YES = ERROR REPORTED CORRECTLY 


7169 033520 ERRDF 9,EMG9,ERRG2 UNEXPECTED CONTROL OUT RECEIVED 











DMIDO DMR=11 FUNCTIONAL TESTS MACY11 eesshiigess 29-J 
11:32 TEST 12 = PROCEDURE ERRORS 


CZDM 

CZDMID.P11 29-JUL=81 
7170 ~=033520 104455 
7171 +033522 000011 
7172 033524 020040 
7173 033526 015124 
7174 033530 
7175 «033530 042777 
7176 033536 005037 
7177 + 033542 
7178 033542 
7179 =033542 104403 
7180 
7181 033544 
7182 033544 
7183 033544 104402 
7184 033546 
7185 
7186 033546 004737 
7187 
7188 
7189 033552 
7190 033552 104410 
7191 033554 000306 
7192 033556 
7193 
7194 033556 004737 
7195 033562 004000 
7196 033564 002640 
7197 033566 000522 
7198 
7199 
7200 033570 
7201 033570 104410 
7202 033572 000270 
7203 033574 
7204 
7205 033574 004737 
7206 033600 000044 
7207 033602 002572 
7208 033604 000044 
7209 
7210 
7211 03 
7212 033606 104410 
7213 033610 0002 
7214 033612 012737 
7215 
7216 
7217 033620 
7218 
7219 033620 004737 
7220 033624 000040 
7221 033626 002522 
7222 033630 000000 
7223 
7224 
7225 033632 


000207 
002366 


011070 


011266 


012272 


000001 


012272 


146476 


002366 


BIC 

CLR 
ENDSUB 
BGNSUB 


CLEAR 
JSR 


ESCAPE 


BASE IN 
JSR 


ESCAPE 


BACCIR 
JSR 


ESCAPE 
MOV 


BACCIT 
JSR 


WAIT 


J 12 
UL=81 12:42 PAGE 153 


#RDO! CMD ,ASEL2 
ERROR 
PC, $MSCLR 
TST 
PC, $BASEI 
.WORD  LPLU 
-WORD BASE 
-WORD ODMR 
TST 
PC, C 
-WORD RQI'!BACCR 
-WORD RBUF 
D  RCOUNT 
TST 
A#CNTRL ERROR 
TBUF ,0 
PC, 


-WORD TBUF 
WORD 0 


$BACC 
.WORD RQI'!BACCT 


TRAP 
. WORD 
WORD 
. D 
;CLEAR RDO AND THE COMMAND BITS. 
sRESTORE FLAG 
L10070: 
TRAP 
712.4: 
TRAP 
sMASTER CLEAR 
y*x*** MACRO EXPANSION **** 
; ISSUE A DMR MASTER CLEAR 
pane eenek 
z1F ERROR, EXIT. 
TRAP 
. WORD 


BASE IN COMMAND 

;**** MACRO EXPANSION **** 

:CALL BASE IN ROUTINE WITH DEFAULTS 
:SET LINE UNIT LOOP 

BASE TABLE ADDRESS 

;DMR-11 MODE 


Pilelatel Re 


:IF ERROR, EXIT. 
TRAP 


. WORD 
zASSIGN A BA/CC IN RECEIVE BUFFER 
;***% MACRO EXPANSION **** 

;CALL BA/CC IN ROUTINE WITH DEFAULTS 
ett IN RECEIVE COMMAND 
;RECEIVE BU 


FFER 
sRECEIVE CHARACTER COUNT 


ret RAK 


zIF ERROR, EXIT. 


SWORD 
aan k FLAG WILL DISABLE ANY CONT 
: CAUSING 


ONE. 
SASSIGN A BA/CC IN XMIT BUFFER LENGTH = 


;**** MACRO EXPANSION **** 
:CALL BA/CC IN ROUTINE 
3;BA/CC_IN TRANSMIT COMMAND 
;BUFFER ADDRESS BITS 0-15 
:BA Bits 16 & 17 AND CHAR. COUNT 


wane 


;WAIT FOR RDO TO BE SET 


SEQ 0152 


CSERDF 
9 


EMG9 
ERRGZ 


CS$ESUB 


C$BSUB 


CSESCAPE 
L10065-. 


CSESCAPE 
y betes. 


ROL OU 
REPORTING BECAUSE WE ARE INTENTIONALLY 


0. 


033760 








CZDMIDO DMR=-11 FUNCTIONAL TES! 
CZDMID.P11 29-JUL-81 11:52 

7226 

722? 033632 004737 010276 
7228 033636 000001 

7229 

7230 033640 

7231 033640 104410 

7232 033642 000220 

7233 033644 032777 000001 
7234 033652 001005 

7235 033654 

7236 033654 104455 

7237 033656 000010 

7238 033660 017774 

7239 033662 015124 

7240 033664 000410 

7241 033666 

7242 033666 032777 001000 
7243 033674 001004 

7244 033676 

7245 033676 104455 

7246 033700 000011 

7247 033702 020040 

7248 033704 015124 

7249 033706 

7250 033706 042777 000207 
7251 033714 005037 002366 
7252 033720 

7253 033720 

7254 033720 104403 

7255 

7256 033722 

7257 033722 

7258 033722 104402 

7259 033724 

7260 

7261 033724 004737 011070 
7262 

7263 

7264 033730 

7265 033730 104410 

7266 033732 000130 

7267 033734 

7268 

7269 033734 004737 011266 
7270 033740 004000 

7271 033742 002640 

7272 033744 000522 

7273 

7274 

7275 033746 

7276 033746 104410 

7277 033750 000112 

7278 033752 012737 000001 
7279 

7280 


K 12 
12:42 * DAGE 154 


SEQ 0153 


CSESCAPE 
1 


CSERDF 
8 


EMG8 
ERRG2 


CSERDF 
9 


EMG9 
ERRG2 


C$ESUB 


C$BSUB 


CSESCAPE 
L1006 


cee 
L10065-. 


MACY11 30A(1052) eso yyl=8! 
T 12 = PROCEDURE ERRORS 
nee MACRO EXPANSION **#® 
JSR PC, SWAIT CALL WAIT ROUTINE 
.WORD 1 :FLAG THAT WE'RE WAITING FOR RDO 
ESCAPE TST TIF “RDO NOT SET, BR To. TEST END. maa 
146362 BIT MCNTRL,@SEL2  ;1S THIS A CONTROL OUT? 7 
BNE 1 ‘IF YES = PROCEED. 
ERRDF 8,EMG8,ERRG2 EXPECTED CONTROL OUT 
TRAP 
. WORD 
-WORD 
BR 15$ sEXIT i" 
146344 BIT #HALTC,@SEL6  =;1S THE HALT = PROCEDURE ERROR BIT SET? 
BNE SIF YES = ERROR REPORTED CORRECTLY 
ERRDF 9,EMG9,ERRG2 § :UNEXPECTED CONTROL OUT RECEIVED 
. WORD 
WORD 
WORD 
146320 BIC #RDO!CMD,@SEL2 ;CLEAR RDO AND THE COMMAND BITS. 
CLR ERROR *RESTORE FLAG 
ENDSUB 
L10071: 
TRAP 
BGNSUB 
Tiz.33 
TRAP 
CLEAR :MASTER CLEAR 
i*x** MACRO EXPANSION **«* 
JSR PC, $MSCLR ‘ISSUE A DMR MASTER CLEAR 
keke KeKkk 
ESCAPE TST :IF ERROR, EXIT. 
TRAP 
. WORD 
BASE IN :BASE IN COMMAND 
ix*** MACRO EXPANSION **** 
JSR PC, $BASEI *CALL BASE IN ROUTINE WITH DEFAULTS 
.WORD LPLU  :SET LINE UNIT LOOP 
“WORD BASE  ;:BASE TABLE ADDRESS 
.WORD DMR :DMR-11 MODE 
puaKe Rake 
ESCAPE TST :1F ERROR, EXIT. 
TRAP 
002366 MOV #CNTRL,ERROR =; THIS FLAG WILL DISABLE ANY CONTROL OUT 
ERROR, REPORTING BECAUSE WE ARE INTENTIONALLY 


RBUF ,0 





ZASSIGN A BA/CC IN REC. BUFFER LENGTH = 


0 


C2DMID. P11 





0 
033770 


033772 


033772 
033776 





29-JUL=81 


004737 
000044 
002572 
000000 


004737 
000001 
104410 
000060 
032777 
001005 
104455 
000010 
017774 
015124 
000410 
032777 
001004 
104455 
000011 
020040 
015124 
042777 
005037 


104403 


104401 





CZDMIDO DMR-11 ete og TESTS MACY11 eames” 


11:32 


012272 


010276 


000001 


001000 


000207 
002366 


ef ie 


RDO 
PC, SWAIT 
«WORD 1 


TST 


+ tl eammenae 
8. EMG8 ,ERRG2 


15$ 
MHALTC,@SEL6 
15$ 
9,EMG9,ERRG2 


ARDO! CMD ,@SEL2 
ERROR 


L 12 
12:42 AGE 155 SEQ 0154 
T 12 = PROCEDURE ERRORS 


;***% MACRO EXPANSION **** 


ch :CALL BA/CC IN ROUTINE 


s;BA/CC_IN RECEIVE COMMAND 
;BUFFER ADDRESS BITS 0-15 
7BA BITS 16/17 AND CHAR. COUNT 


pune nkKkk 


z;WAIT FOR RDO TO BE SET 
;***% MACRO EXPANSION **** 
sCALL WAIT ROUTINE 


FLAG THAT WE'RE WAITING FOR RDO 


puKke KKKK 


TIF RDO NOT SET, BR TO TEST END. 
TRAP CSESCAPE 


«WORD L10065-. 
71S THIS A_ CONTROL OUT? 
:IF YES = PROCEED. 
ZEXPECTED CONTROL OUT 

TRAP CSERDF 


-WORD 8 
-WORD EMG8 
«WORD ERRG2 


sEXIT 


:IS THE HALT - PROCEDURE ERROR BIT SET? 
YES =~ ERROR REPORTED CORRECTLY 


i IF 
UNEXPECTED CONTROL OUT RECEIVED 


CSERDF 
9 


EMG9 
«WORD ERRG2 


:CLEAR RDO AND THE COMMAND BITS. 
sRESTORE FLAG 


L10072: 
TRAP CSESUB 


L 10065: 
TRAP CSETST 





M12 
12: i # "PAGE 156 


CZDMIDO DMR-11 ale og TESTS MACY11 SOTO? st Yt. SEQ 0155 
CZDMID.P11 29-JUL=-81 11:32 T 13 = DATA T 

est . SBTTL TEST 13 = DATA TEST 

7325 ee ct amet Oh & Ree nara eee 

7326 7* TEST 13 = DMR-11 

7327 :* FREE re FLAG MODE DATA TEST 

7328 ;* TRANSMIT A MESSAGE AND VERIFY THE RECEIVED DATA IS CORRECT. 

7329 :* IN THIS TEST NO oka anne ¥ SED AND THE LINE UNIT IS IN 

7330 3* yey (TTL) L THIS S TEST IS THE FIRST TEST IN WHICH 

7331 3* THE DMR IS USED INA DATA TRANSMISSION MODE. 

7332 RARER RRR E EERE REE ERE REE ERE RRR RRR ERE REE 

7333 034064 BGNTST 

7334 034064 T13:: 

7335 034 013700 000044 MOV RCOUNT ,RO ;BYTE COUNT FOR ear Buri ER 

7336 034070 062700 000002 ADD #2,R0 z2 ADDITIONAL 443 He T END OF BUFFER ARE 

7337 USED FOR DELIMITOR 

7338 034074 012701 002572 MOV A#RBUF ,R1 S ADDRESS OF RECEIVE BUFFER 

7339 034100 10$: 

7340 0341 105021 CLRB (R1)+ ;CLEAR A BYTE IN THE BUFFER 

7341 034102 005300 DEC RO CONT INUE = UNTIL ENTIRE BUFFER DONE 

Le os 4 024104 001375 BNE 10$ 

7344 0341 005037 002520 CLR TFLAG ;CLEAR TRANSMIT FLAG 

7345 034112 005037 002570 CLR RFLAG ;CLEAR RECEIVER FLAG 

7346 034116 CLEAR :MACRO FOR MASTER CLEAR 

7347 3 **%* MACRO EXPANSION **** 

7348 034116 004737 011070 JSR PC, SMSCLR ; ISSUE A DMR MASTER CLEAR 

7349 7* KKK 

7350 

7351 034122 ESCAPE TST ;IF ERROR, BR TO TEST END. 

7352 034122 104410 TRAP CSESCAPE 

7353 034124 0004 «WORD 1L10073-. 

7354 034126 005737 002254 TST DMTURN 31S INTERNAL LOOPBACK DESIRED? 

7355 034132 1 BNE 11$ TIF NOT, CLEAR INTERNAL LOOPBACK. 

7356 0341 052737 004000 024156 BIS #LPLU, 100$ SET LING UNIT LOOPBACK. 

7357 034142 BR 12$ 

7358 034144 

4344 Oar ies 042737 004000 034156 BIC #LPLU, 100$ ;CLEAR LINE UNIT LOOPBACK. 

7361 034152 CALL $BASE I ;BASE IN COMMAND. 

7362 034156 100$: -WORD 0 :MAINTENANCE BITS (LINE UNIT LOOP) 

73635 0341 002640 -WORD BASE BASE TABLE ADDRESS 

7364 034162 000522 “WORD DMR MODE 

7365 0341 ESCAPE TST TIF ERROR, BR TO TEST END. 

7366 034164 104410 TRAP CSESCAPE 

oeen 034166 00042 «WORD 110073-. 

7369 034170 CALL $LOOP :DMR COMMAND TO SET “a BITS 

7370 034174 ESCAPE TST :1F ERROR, BR TO TEST END 

7371 034174 104410 TRAP CSESCAPE 

ee 034176 000414 «WORD 110073-. 

7374 .034200 CNTRIN ;MACRO FOR CONTROL IN (FULL DUPLEX) 

7375 ;**** MACRO EXPANSION * 

7376 034200 004737 011522 JSR PC, SCNTIN CALL CONTROL IN ROUT INE “WITH DEF AULT 

eld 034204 «WORD QO SSEL6 - FULL DUPLEX, RUN MODE, 1 SEC START. 
eeee kkk 





| 


ca 








CZDMIDO DMR-11 ne The ve | TESTS MACY11 setehinnatad 


CZDMID.P11 29-JUL=81 
7379 034206 
7380 034206 104410 
7381 034210 000402 
7382 
7383 034212 
7384 
7385 034212 004737 
7386 034216 000044 
7387 034220 002572 
7388 034222 000044 
7389 
7390 
7391 034224 
7392 034224 104410 
7393 034226 000364 
7394 
7395 034230 
7396 
7397 034230 004737 

98 0342 000040 

7399 034236 002522 
7400 034240 000044 
7401 
74 02 : ' 
7403 034242 
7404 034242 104410 
7405 034244 000346 
7406 
7407 034246 
7408 034246 
7409 
7410 034246 004737 
7411 034252 000001 
7412 : 
7413 034254 
7414 034254 103552 
7415 034256 032777 
7416 034264 001405 
7417 034266 
7418 034266 104455 
7419 034270 00001 
7420 034272 020040 
7421 034274 015124 
7422 034276 000541 
7423 034300 
7424 034300 032777 
7425 034306 001035 
7426 
7427 
7428 
7429 034310 005737 
7430 034314 001405 
7431 034316 
7432 034316 104455 
7433 034320 000912 
7434 034322 020067 


11:32 


012272 


012272 


010276 


000001 


000004 


002520 


145750 


145726 


N 12 
tr Vt es 12: i & NPAGE 


T 13 = DATA T 
ESCAPE TST 
BACCIR 
JSR PC, C 
-WORD RQI! 
P D RBUF 
-WORD RCOUNT 
ESCAPE TST 
BACCIT 
JSR PC, S$BACC 
.WORD RQI'!BACCT 
-WORD TBUF 
.- WORD TCOUNT 
ESCAPE TST 
20$: 
WAIT RDO 
JSR PC, SWAIT 
.» WORD 1 
BERROR 52$ 
BIT #CNTRL,@SEL2 
BEQ 
ERRDF 9, EMG9,ERRG2 
BR 52$ 
BIT ARCV,@SEL2 
BNE 40$ 
CHECK TRANSMIT 
TST TFLAG 
BEQ 30$ 
ERRDF 10,EMG10,ERRG2 


157 SEQ 0156 


:1F ERROR, BR TO TEST END. 


TRAP CSESCAPE 
«WORD 110073-. 


;BUFFER ADDRESS/CHARACTER COUNT REC. IN 
z**#* MACRO EXPANSION *#** 
es GA/CC IN ROUTINE WITH DEFAULTS 


5 +4) RECEIVE COMMAND 


sRECEIVE BUFFE 
RECEIVE CHARACTER COUNT 


pueee akKK 


:1F ERROR (I.E. RDI NOT SET), ESCAPE 
TRAP 


CSESCAPE 
«WORD 1L10073-. 


;BUFFER ADDRESS/CHARACTER COUNT XMIT. IN 


;***% MACRO EXPANSION **** 

CALL BA/CC IN po he WITH DEFAULTS 
/CC_IN TRANSMIT COMMAND 

; TRANSMIT BUFFER ADDRESS 

; TRANSMIT CHARACTER COUNT 


keke RkKKK 


7IF ERROR (I.E. RDI NOT SET), ESCAPE 
TRAP 


CSESCAPE 
«WORD 1L10073-. 
;WAIT FOR RDO 
;***% MACRO EXPANSION **** 
sCALL WAIT ROUTINE 
FLAG THAT WE'RE WAITING | FOR RDO 
puKke 
SIF ERROR ~ RDO NOT SET. “END TEST $28 
71S THIS A CONTROL OUT COMMAND ? 
7; IF NOT =~ PROCEED 
[UNEXPECTED CONTROL OUT RECEIVED 
TRAP CSERDF 
«WORD 9 
- WORD 


EMG9 
-WORD ERRG2 


; TRANSMIT OR RECEIVE ? 
3BR FOR RECEIVE 


eS THIS THE FIRST TRANSMIT DONE? 


; YE OK 
“ERROR MULTIPLE TRANSMITS 
TRAP ama 


-WORD €&MG10 


JF 


CZDMIDO DMR=11 FUNCTIONAL TESTS 


CZDMID.P11 


29-JUL=81 


015124 
000525 
012737 
022777 
001405 
104455 
000013 
020116 
015124 
000511 
022777 
001470 
104455 
000014 


020141 
015124 
000500 


005737 
001405 


104455 
000015 
020167 
015124 
000470 


012737 


022777 
001405 


104455 
14 


0000 

020141 
015124 
000443 


012700 
012701 
012702 


11:32 


177777 
002522 


000044 


002570 


177777 
002572 


000044 


000044 
002522 
002572 


MACY11 a. 


002520 
145672 


145652 


002570 
145600 


145560 


B 13 
12: cs BPAGE 158 


otf Yt. 5 SEQ 0157 
T 13 = DATA T 
-WORD ERRG2 
BR 52$ 
MOV #-1,TFLAG ;FLAG THAT TRANSMIT CHECK IS DONE. 
CMP #TBUF ,ASELS ; TRANSMIT BUFFER ADDRESS CORRECT? 
BEQ 3 sYES - PROCEED 
ERRDF 11,EMG11,ERRG2 ;BUFFER ADDRESS ERROR 
TRAP CSERDF 
-WORD 17 
»WORD €EMG11 
-WORD ERRG2 
BR 52$ 
32$: 
CMP MTCOUNT,@SEL6 ;COUNT CORRECT ? 
BEQ 5 sYES = PROCEED 
ERRDF 12,EMG12,ERRG2 ;CHARACTER COUNT ERROR 
TRAP CSERDF 
-WORD 12 
-WORD EMG12 
-WORD ERRG2 
BR 52$ 
sCHECK RECEIVE 
40$: 
TST RFLAG 1S THIS THE FIRST RECEIVE DONE ? 
BEQ 41$ :YES = PROCEED 
ERRDF 13.—EMG13,ERRG2 ;MULTIPLE RECEIVES 
TRAP CSERDF 
-WORD 13 
-WORD EMG13 
- WORD ERRG2 
“e BR 52$ 
MOV #-1,RFLAG sFLAG THAT RECEIVE CHECK HAS BEEN DONE. 
CMP ARBUF , A@SEL4S 71S THE RECEIVE BUFFER ADDRESS CORRECT? 
BEQ 4 :YES - PROCEED 
ERRDF 11,EMG11,ERRG2 ;BUFFER ADDRESS ERROR 
TRAP CSERDF 
-WORD 11 
-WORD EMG11 
-WORD ERRG2 
43s BR 52$ 
CMP MRCOUNT,@SEL6 ;IS THE BUFFER COUNT CORRECT? 
BEQ 44$ sYES - PROCEED 
ERRDF 12,EMG12,ERRG2 :CHARACTER COUNT ERROR 
TRAP CSERDF 
-WORD 12 
-WORD EMG12 
-WORD ERRG2 
a BR 52$ 
MOV #RCOUNT ,RO ;SET UP FOR DATA CHECK (CHARCATER COUNT) 
MOV #TBUF ,R1 :GOOD DATA POINTER 
MOV #RBUF ,R2 *RECEIVE DATA POINTER 





CZDMID.P11 





29-JUL-81 1 


122122 
001011 


1:32 


000213 
002570 
034246 


002520 
034246 


012562 


145456 


CZDMIDO DMR-11 Aap Doh ™ TESTS MACY11 seinbicetes 


45$: 


46$: 


ERRDF 


BR 


C 13 
29-JUL-81 12: ie, « PAGE 159 SEQ 0158 
ST 13 = DATA T 


(R1)+,(R2)+ :1S THE DATA THE SAME ? 
46$ ; IF NOT, BRANCH TO DATA ERROR MESSAGE 
RO ; CONTINUE CHECKING UNTIL DONE WITH BUFFER. 


45$ 
aR2 THIS SHOULD BE 0 = REMEMBER WE CLEARED 
32 EXTRA A DURING BUFFER INIT. 
50$ :IF OK = PROCEED 
14,EMG14,ERRG2 RECEIVED EXTRA DATA 
TRAP > ip 


«WORD 
«WORD EMG14 
«WORD ERRG2 


52$ 


15,EMG15,ERRG2 ;DATA ERROR 
TRAP | aed 


«WORD 
-WORD &MG15 
«WORD ERRG2 


52$ 


; TRANSMIT OR RECEIVE CHECK DONE 


50$: 


51$: 


52$: 


ENDTST 


SHUTDN 
JSR 


CALL 


A#RDO+RCV+CMD,ASEL2 ;CLEAR RDO, RCV & COMMMAND BITS (0,1) 
RFLAG 31S’ THE RECEIVE DONE ? (IF DONE, FLAG = -1) 
:YES - SEE IF TRANSMIT one 


20$ [NO - GO BACK AND DO IT 
TFLAG :I1S THE TRANSMIT DONE ? 
52$ :YES - BR TO SHUTDOWN 
20$ zNO - DO IT 

; SHUTDOWN Di 

;**** MACRO EXPANSION anen 
PC, $HALT [DMR HALT ROUTINE. 

: oer KKK 
SERROR ;CHECK BASE TABLE AND REPORT ANY SOFT ERRORS 
L10073: 


TRAP CSETST 


D 13 
DMIDO DMR=-11 Nate oe P TESTS MACY11 —— ef? fe -e 12:42 ° PAGE 160 SEQ 0159 


TOMI. P11 29=JUL=81 11:32 T 14 = EXTENDED ADDRESSING DATA TEST 
7538 .SBTTL TEST 14 = EXTENDED ADDRESSING DATA TEST 
7540 ee hed ae pee ete ee ee ee ee ee ee eee 
7541 : TEST 14 = DMR=11 
7542 ce IN THIS TEST = SEE IF WE HAVE MEMORY MANAGEMENT, IF SO SEE IF WE 
7543 :* HAVE THE MEMORY TO CHECK BITS 16 & 17 IN SEL6. THIS WILL ALLOW 
7544 :* US TO TRANSFER DATA USING THOSE EXTCNDED ADDRESSING BITS. AS IN 
7545 :* TEST 13 THE TEST IS NON-INTERRUPT AND INTERNAL (TTL) LOOPBACK IS 
[8 :* USED. 
7548  euensendennenoonshenneerensenenenequensenasennagnnenesqnnecsenecneunn 
7549 034614 BGNTST 
7550 034614 T14:: 
7551 .ENABL LSB ENABLE LOCAL BLOCK = NEEDED BECAUSE OF 
7552 USE OF SYMBOLIC LABELS ‘RSEL4’’ ETC. 
7553 034614 SETVEC #4,4NOXMEM, WPRIO? = 7SET UP TRAP VECTOR 4 
7554 034614 012746 000340 MOV #PRIO7,-(SP) 
7555 034620 012746 023630 MOV #NOXMEM, = (SP) 
7556 034624 012746 000004 MOV #4 ,-(SP) 
7557 034630 012746 3 MOV #3,-(SP) 
7558 034634 104437 TRAP  C$SVEC 
7559 034636 062706 000010 ADD #10,SP 
7560 034642 005037 002352 CLR NXMF LG ZCLEAR FLAG - SET IF TRAP TO 4. 
7561 034646 005737 177572 TST a#177572 TADDRESS MEMORY MANAGEMENT REGISTER. 
7562 034652 CLRVEC #4 “RESTORE TRAP VECTOR 4. 
7563 034652 012700 000004 MOV #4 ,RO 
7564 034656 104436 TRAP  C$CVEC 
7565 034660 005737 002352 TS] NXMF LG z1S THE FLAG STILL CLEARED? 
7566 ‘NOTE: THE FLAG WILL BE SET BY TRAP 4 
7567 :1F THERE IS NO MEMORY MANAGEMENT 
7568 034664 001404 BEQ 10$ TIF FLAG 1s CLEARED, PROCEED WITH TEST. 
7569 034666 005037 002352 CLR NXMF LG TRESTORE FLAG 
7570 034672 000137 036236 JMP 85$ ‘EXIT = CAN'T TEST WITHOUT MEM. MANAG. 
7571 034676 10$: 
7572 ZNOTE: LSHIMCM IS SIZE OF TOTAL MEMORY IN 
7573 :PAGE ADDRESS REGISTER FORM - DETERMINED BY 
7574 ‘BY DIAGNOSTIC SUPERVISOR AT STARTUP. 
7575 034676 023727 002120 002200 CMP LSHIMEM,#2200 :DO WE HAVE ENOUGH MEMORY TO ADDRESS BIT 16? 
7576 034704 002002 BGE 15$ ZIF YES = PROCEED WITH TEST 
7577 034706 000137 036236 JMP 85$ :IF NOT = EXIT 
7578 034712 15$: 
7579 034712 SETPRI #PRIO7 zMAKE SURE WE ARE IN KERNEL MODE. 
7580 034712 012700 000340 MOV #PRIO7,RO 
7581 034716 104441 TRAP —C$SPRI 
7582 :SETTING PRI SHOULD ALSO CLEAR BITS 14 @15 
7583 :IN PSW WHICH PLACES PROCESSOR IN KERNEL MODE. 
7584 034720 012701 172300 MOV #172300,R1 :GET ADDRESS OF KERNEL PDR REG 0 
7385 034724 012700 000010 ae MOV #8. RO [GOING TO WRITE PDR REG 0-7 
7587 034730 012721 077406 MOV #77406,(R1)+ | ;WRITE BITS FOR THE FOLLOWING PAGE DESCRIPTION 
7588 SREAD/WRITE ACCESS, 128. BLOCK PAGE LENGTH. 
7589 034734 005300 DEC RO SWRITE ALL PDRS 
7590 034736 001374 BNE 20$ 
7591 034740 012701 172340 MOV #172340,R1 :GET ADDRESS OF KERNAL PAR 0 
7592 034744 005011 CLR (R1) [PAR 0, ADDRS 0 1777 


7593 034746 012761 000200 000002 MOV #200,2(R1) ;PAR 1, ADDRS 20000 - 37796 
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CZDMID.P11 — 29-JUL=81 11:32 T 14 = EXTENDED ADDRESSING DATA TEST 
759% 034754 012761 000400 000004 Mov -#400,4(R1) :PAR 2, ADDRS 40000 - 57776 
7595 034762 012761 000600 000006 MOV —-#600-6(R1) SPAR 3, ADDRS 60000 - 77776 
759 034770 012761 001000 000010 MOV  #1000,10(R1) ~— :PAR 4, ADDRS 100000 = 117776 
7597 034776 012761 002000 000012 MOV -#2000;12(R1) — :PAR 5, ADDRS 200000 = 217776 
7598 035004 012761 004000 000014 MOV -#4000;14(R1)  :PAR 6, ADDRS 400000 = 417776 
7599 035012 012761 007600 000016 MOV -#7600,16(R1) — :PAR 7, ADDRS 160000 ~- 177776 (1/0 PAGE) 
7601 035020 012703 000100 MOV #64. ,PR3 COUNTER FOR OUTER LOOP OF ay PATTERN GEN. 
7602 035024 012704 120000 Mov —-#120000.R4 ZUSE VIRTUAL ADDRESS TO MAP TO PAR 5) 
7603 :GENERATE A TEST PATTERN IN THE 1 
7604 SBYTES OF PAR 5 (VIRTUAL ADDR 120000 = - 127776) 
7605 035030 005037 002352 CLR NXMF LG ENSURE FLAG IS CLEARED 
7606 035034 SETVEC #4 MANOXMEM, WPRIO? ;SET UP TRAP VECTOR 4 (WILL SET FLAG) 
7607 035034 012746 000340 MOV #PRIO7,~(SP) 
7608 035040 012746 023630 MOV - #NOXMEM, = (SP) 
7609 035044 012746 000004 MOV #4, =( SPS 
7610 035050 012746 000003 MOV #3, = (SP) 
7611 035054 104437 TRAP C$SVEC 
7612 035056 062706 000010 ADD #10, SP 
7613 035062 012737 000001 17572 |. MOV #1,@#177572 ENABLE MEMORY MANAGEMENT 
7615 035070 012701 000040 MOV #32. ,R1 :COUNTER FOR INNER LOOP OF TEST PATTERN GEN. 
mls Beton 012702 002420 225 MOV #$CCITT,R2 SADDRESS FOR 32. WORD TEST PATTERN 
7618 035100 012<24 MOV (R2)+, (R4)+ ;WRITE TEST PATTERN INTO 4K BYTES 
7619 en ae ADDRESS 200009 - 207776) 
7620 035102 005737 002352 TST ——NXMFLG TRAP 4? 
7621 035106 001014 BNE 24$ % YES ~ EXIT 
7622 035110 005301 DEC R1 ;DO THE INNER LOOP 32. TIMES 
7623 035112 001372 BNE 228 
7624 035114 005303 DEC R3 ;DO THE OUTER LOOP 128. TIMES 
7625 035116 001364 BNE 218 
7626 035120 012701 004000 MOV -#4000,R1 :COUNTER TO CLEAR THE NEXT 4K BYTES. 
7627 035124 238: 
7628 035124 005024 CLR (R4)+ :CLEAR OUT THE ENTIRE P 
7629 : (PHYSICAL ADDRESS 210000 - 217776) 
7630 035126 005737 002352 TST NXMFLG :NXM TRAP 4 
7631 035132 001002 BNE 248 If VES ~ EXIT 
7632 035134 005301 DEC — RT 
7633 035136 001372 23$ 
7634 035140 248: 
7635 035140 005037 177572 CLR #177572 ;TURN OFF MEMORY MANAGEMENT 
7636 035144 CLRVEC #4 RESTORE TRAP 4 TO SUPERVISOR 
7637 035144 012700 000004 MOV #4, RO 
7638 035150 104436 TRAP CSCVEC 
7639 035152 005737 002352 TST NXMFLG :WAS THIS AN ERROR EXIT 
7640 035156 001417 BEQ 25$ :1F NOT, PROCEED. 
7641 035160 ERRDF 19, EMT22 
7642 035160 104455 , TRAP CSERDF 
7643 035162 000023 \ .WORD 19 
7644 035164 036240 “WORD EMT22 
7645 035166 000000 “WORD 0 
7646 035170 PRINTB #FMT25,Ré 
7647 035170 010446 MOV RG, =(SP) 
7648 035172 012746 036276 MOV —-#FMT25,~( SP) 


7649 035176 012746 000002 MOV #2,-(SP) 








CZDMIDO DMR=11 FUNCTIONAL 7H he MACY11 seat hteal 


CZDMID.P11 


035202 
0 


035216 
035216 
035222 
035222 
035224 


035226 


035276 
035300 


035300 
035304 


035306 
035306 
035310 
035312 


035316 
035322 


035326 
035334 


035342 
035346 


035354 
035354 


29-JUL-81 


104410 
000740 


012737 
012737 


005037 
012737 


000006 
036236 


011070 


002254 


004000 035256 


004000 035256 


011522 


002520 
002570 
002346 


010000 035362 
050000 035364 


035400 
050000 035402 


25$: 


100$: 


CALL 
ESCAPE 


CNTRIN 
JSR 


35$: 


ey ee PAGE 162 
14 = EXTENDED ADDRESSING DATA TEST 


12:42 


85$ 


PC, SMSCLR 


TST 


DMTURN 

30$ 

ALPLU, 100% 
32$ 

#LPLU, 100% 


$BASE I 
. WORD 
. WORD 
. WORD 
TST 


0 
BASE 
DMR 


$LOOP 
TST 


PC, $SCNTIN 
-WORD 0 


TST 


TSEL4 
#B1T14!10000, sei6 :XMIT BUFFER ADDR BIT 16 SET AND 4K 
;BYTE XMIT CHARACTER COUNT 


; ISSUE THE BUFFER ADDR/ CHAR COUNT COMMAND 


$BACC 


7CLEAR TRANSMIT FLAG 

CLEAR RECEIVE FLAG 

sCLEAR SECOND LOOP FL 

AG i, THEN T 

E BUFFER ADDRESS (BITS Pon 
M is T AND 4K 

RANSMIT BUFFER ADDRESS (BITS 0-15) 


SEQ 0161 

MOV SP,RO 
TRAP C$PNTB 
ADD #6,SP 

sMACRO FOR MASTER CLEAR 

z**** TIACRO EXPANSION **** 

; ISSUE A DMR MASTER CLEAR 

sunken aaah 

IF ERROR, BR TO TEST END. 
TRAP CSESCAPE 
«WORD 1L10074-. 

1S INTERNAL LOOPBACK DESIRED? 

:1F NOT, CLEAR INTERNAL LOOPBACK. 

:SET LINE UNIT LOOPBACK. 

;CLEAR LINE UNIT LOOPBACK. 

BASE _IN COMMAND. 

;MAINTENANCE BITS (LINE UNIT LOOP) 

BASE TABLE ADDRESS 

:DMR MODE 

:IF ERROR, BR TO TEST END. 
TRAP CSESCAPE 
«WORD 1L10074-. 

;DMR_ COMMAND TO SET MAINT. BITS 

IF ERROR, BR TO TEST END. 
TRAP CSESCAPE 
«WORD 1L10074-. 

z:MACRO FOR CONTROL IN (FULL DUPLEX) 

;**** MACRO EXPANSION **** 

:CALL CONTROL IN ROUTINE WITH DEFAULT 

;SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START. 

pune KKK 

IF ERROR, BR TO TEST END. 
TRAP CSESCAPE 
-WORD 110074-. 


AG 
= 0, THEN = IS A TEST OF BIT 16 
HIS ISA rea! OF BIT 17 


a 
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CZDMID.P11 29-JUL-81 11:32 TEST 14 = EXTENDED ADDRESSING DATA TEST 
7706 035360 000044 -WORD RQI!BACCR ; COMMAND FOR ne IN RECEIVE 
7707 035362 000000 RSEL4: -WORD 0O ;BUFFER ADDRESS BITS 0-15 
7708 035364 000000 RSEL6: -WORD 0 ;BUFFER ADDR BIT tS + CHAR. COUNT 
7709 035366 ESCAPE TST Z1F ERROR, END TEST 
7710 035366 104410 TRAP CSE SCAPE 
aan} 035370 000646 -WORD 1L10074-. 
7713 035372 CALL SBACC ; ISSUE THE BUFFER 4 CHAR COUNT C 
7714 035376 000040 WORD RQI!BACCT ; COMMAND FOR BA/CC IN TRANSMIT 
7715 035400 000000 TSEL4: -WORD 0O ;BUFFER ADDRESS BITS 0-15 
7716 035402 0900000 TSEL6: -WORD 0 ;BUFFER ADDR BIT bs + CHAR. COUNT 
7717 035404 ESCAPE TST ;1F ERROR, END TEST 
7718 035404 104410 TRAP CSE SCAPE 
7719 035406 000630 «WORD 110074-. 
7720 035410 40$: 
7721 035410 WAIT RDO ;WAIT FOR RDO TO BE SET 
7722 7**** MACRO EXPANSION **** 
7723 035410 004737 010276 JSR PC, $SWAIT CALL WAIT ROUT INE 
7724 035414 000001 . WORD 1 ;FLAG THAT WE'RE WAITING FOR RDO 
7725 peKee KKK 
7726 035416 ESCAPE TST TIF RDO NOT SET BEFORE TIMEOUT, END TEST 
7727 035416 104410 TRAP CSESCAPE 
SS 035420 000616 -WORD 1L10074-. 
7730 035422 032777 000001 144604 BIT MCNTRL,@SEL2 71S mg | A CONTROL OUT COMMAND? 
7731 035430 001406 BEQ :NO = PROCEED 
7732 035432 ERRDF 9,EMG9,ERRG2 ;UNEXPECTED CONTROL OUT. 
7733 035432 104455 TRAP CSERODF 
7734 035434 000011 «WORD 9 
7735 035436 020040 -WORD EMG9 
7736 035440 015124 «WORD ERRG2 
7737 035442 000137 036226 JMP 80$ EXIT 
7738 035446 50$: 
7739 035446 032777 000004 144560 BIT ARCV,@SEL2 71S THIS A TRANSMIT OR RECEIVE? 
7740 035454 001040 BNE 60$ ;BR FOR RECEIVE 
7741 035456 005737 002520 TST TFLAG :1S THIS THE 1ST TRANSMIT DONE 
7742 035462 001406 BEQ 55$ TIF YES, PROCEED 
7743 035464 ERRDF 10,EMG10,ERRG2 {MULTIPLE TRANSMITS 
7744 035464 104455 TRAP CSERDF 
7745 035466 000012 «WORD 10 
7746 035470 020067 «WORD &MG10 
7747 035472 015124 «WORD  ERRG2 
7748 035474 000137 036226 JMP 80$ sEXIT 
7749 035500 55$: 
7750 035500 012737 177777 002520 MOV #-1,TFLAG zFLAG THAT THE TRANSMIT IS DONE. 
7751 035506 023777 035400 144522 CMP TSEL4, @aSEL4 71S THE BUFFER ADDRESS CORRECT? 
7752 035514 001406 BEQ 56$ :1F OK, PROCEED WITH CHECK. 
7753 035516 ERRDF 11,EMG11,ERRG2 [BUFFER ADDRESS ERROR 
7754 035516 104455 TRAP CSERDF 
7755 035520 000013 «WORD 11 
7756 035522 020116 -WORD €&MG11 
7757 035524 015124 «WORD ERRG2 
7758 035526 000137 036226 JMP 80$ EXIT 
7759 035532 56$: 
7760 035532 023777 035402 144500 CMP TSEL6,@SEL6 71S THE CHAR. COUNT CORRECT? 


7761 035540 001502 BEQ 70$ :1F OK, PROCEED 





; 
CZDMID. 


ZDMIDO DMR=11 Mae og TESTS MACY11 onan 
29-JUL=81 


P11 


035542 


104455 


000014 
020141 
015124 

37 


023777 
001404 


104455 
000014 
020141 
015124 
005737 
001007 

012700 
012701 
012702 
000406 
012700 
012701 
012702 
012737 


022122 
001003 


005300 
001374 
000407 
005037 





11:32 


036226 
002570 


036226 


177777 
035362 


035364 


002346 


004000 
120000 


130000 
010000 
120000 
140000 


000001 


177572 


60$: 


61$: 


002570 
144422 


62$: 


144402 


63$: 


65$: 


66$: 
67$: 


177572 


68$: 


ef? es 


ERRDF 


a4#177572 
15,EMG15,ERRG2 


H 13 
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TURN MEMORY MANAGEMENT OFF. 
DATA ERROR 


SEQ 0163 
T 14 = EXTENDED ADDRESSING DATA TEST 

12,EMG12,ERRG2 ;CHARACTER COUNT ERROR = OR EXT MEM PROBLEM 
TRAP CSERDF 
«WORD 12 
«WORD EMG12 
-WORD ERRG2 

80$ sEXIT 

RF LAG 31S THIS bane 1ST RECEIVE DONE 

61$ sIF YES, PROCEED 

13,EMG13,ERRG2 ‘MULTIPLE PRECE IVES 
TRAP ee 
~WORD 13 
-WORD €EMG13 
«WORD E&RG2 

80$ EXIT 

#=-1,RFLAG sFLAG THAT THE RECEIVE IS DONE. 

RSEL4,@SEL4 71S THE BUFFER ADDRESS CORRECT? 

6 zI1F OK, PROCEED WITH CHECK. 

11,EMG11,ERRG2 “BUFFER ADDRESS ERROR 
TRAP CSERDF 
. WORD 11 
. WORD EMG11 
. NORD ERRG2 

80$ EXIT 

RSEL6,@SEL6 71S THE CHAR. COUNT CORRECT? 

6 ‘IF OK, PROCEED 

12,EMG12,ERRG2 * CHARACTER COUNT ERROR 
TRAP CSERDF 
~ WORD 12 
.- WORD EMG12 
-WORD ERRG2 

SFLAG WHICH ExTEN@eS ADDRESS ARE WE CHECKING? 

65$ ;BR FOR BIT 17 CHECK 

#4000,R0 : IN THE TEST OF BIT 16 WE SENT 4K BYTES 

#120000,R1 : THE XMIT BUFFER BEGAN AT THIS VIRTUAL ADDR 

[WHICH WILL MAP TO 200000 

#130000,R2 ;THE REC BUF. MAPS TO 210000 

66$ GO COMPARE THE XMIT AND REC BUFFERS 

#10000,R0 :IN THE TEST OF BIT 17 WE SENT 8K BYTES 

#120000,R1 : THE XMIT BUFFER MAPS TO 200000 

#140000 ,R2 ;THE REC BUF. MAPS TO 400000 

#1,04177572 ; TURN MEMORY MANAGEMENT BACK ON. 

(R1)+,(R2)+ 31S THE DATA THE SAME? 

68$ ;IF NOT THERE IS A DATA ERROR, 

ne + CHECK ENTIRE BUFFER 

70$ :IF DATA OK, PROCEED WITH TEST. 
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CZDM 
CZDMID. P11 29-JUL=81 11:32 TEST 14 = EXTENDED ADDRESSING DATA TEST 
7818 035734 104455 TRAP CSERDF 
7819 035736 000017 «WORD 15 
7820 035740 020235 «WORD EMG15 
7821 035742 015124 «WORD ERRGZ 
7822 035744 000530 BR 80$ sEXIT 
7823 035746 708: 
7824 035746 005037 177572 CLR #177572 TURN TIEMORY MANAGEMENT OFF 
7825 035752 042777 000213 144254 BIC #RDO+RCV+CMD, asei2 a RDO, RCV & COMMMAND BITS (0,1) 
7826 035760 005737 002570 TST RF LAG 31S" THE RECEIVE DONE ? (IF DONE, FLAG = -1) 
7827 035764 001002 BNE 71$ ZYES = SEE IF TRANSMIT DONE 
7828 035766 000137 035410 JMP 40$ 3NO = GO BACK AND DO IT. 
7829 035772 71$: 
7830 035772 005737 002520 TST TFLAG 1S THE TRANSMIT DONE ? 
7831 035776 001002 BNE 72$ :YES ~ SEE IF THERE IS MORE 
7832 036000 000137 035410 JMP 40$ :NO = DO IT 
7833 036004 72$: 
7834 036004 005737 002346 TST SFLAG HAVE WE ALREADY TESTED BIT 17 
rote 036010 001106 BNE 80$ :1F SQ - END OF TEST 
7837 036012 012737 177777 002346 MOV #~1,SFLAG FLAG SO WE DON'T COME THIS WAY AGAIN. 
7838 036020 023727 002120 004200 CMP LSHIMEM,#4200 31S THERE ENOUGH MEMORY TO TEST BIT 17? 
7839 036026 002477 BLT 80$ IF NOT - END OF TEST. 
7840 036030 005037 002520 CLR TFLAG ;CLEAR FLAGS FOR NEXT TEST 
oh 036034 005037 002570 CLR RFLAG 
7843 ISET UP TO TEST BIT 17, IF THERE IS ENOUGH MEMORY. 
7844 :THIS TEST WILL TRANSMIT 8k BYTES STARTING AT PHYSICAL ADDRESS 200000 
7845 ;TO PHYSICAL ADDRESS 400000. THE TRANSMITTED BUFFER STILL CONTAINS 
Moy [THE TEST PATTERN GENERATED IN THE BIT 16 TEST. 
7848 036040 005037 035362 CLR RSEL4 RECEIVE BUFFER ADDRESS (BITS 0-15) 
7849 036044 012737 120000 035364 MOV #B81T15!20000, RSELG REC BUFFER ADDR BIT 17 SET AND 8K 
7850 4 TE RECEIVE CHARACTER COUNT 
7851 036052 005037 035400 CLR TSELS RANSMIT BUFFER ADDRESS (BITS 0-15) 
7852 036056 012737 060000 035402 MOV #81714! 20000, seis :XMIT BUFFER ADDR BIT 16 SET AND 8k 
7853 BYTE XMIT CHARACTER COUNT 
7854 036064 012701 010000 MOV #10000 ,R1 :COUNTER TO CLEAR 8K BYTES 
7855 036070 012704 140000 MOV #140000 ,R4 SVIRTUAL ADDRESS THAT WILL MAP INTO PAR 6 
7856 [WITH THE PHYSICAL ADDRESS 400000 
7857 036074 005037 002352 CLR NXMF LG ENSURE FLAG IS CLEAR 
7858 036100 SETVEC #4,ANOXMEM, WPRIO? SET UP TRAP TO VECTOR 4 (WILL SET FLAG) 
7859 036100 012746 000340 MOV #PRIO07,-(SP) 
7860 036104 012746 023630 MOV #NOXMEM , ~ (SP) 
7861 036110 012746 000004 MOV #4,~(SP) 
7862 036114 012746 000003 MOV #3,-(SP) 
7863 036120 104437 TRAP CS$SVEC 
7864 036122 062706 000010 : ADD #10.SP 
7865 036126 012737 000001 177572 MOV #1,04177572 ; TURN ON MEMORY MANAGEMENT 
7866 036134 74$: 
7867 036134 005024 CLR (R4)+ : CLEAR — - yf 85: 
7868 036136 005737 002352 TST NXMF LG [DOES A NXM TRAP 4 OCCUR? 
7869 036142 001002 BNE 75$ si¥ VES. EXIT 
7870 036144 005300 DEC RO 
7871 036146 001372 E 74$ 
7872 036150 75$: 


7873 036150 005037 177572 CLR a4177572 TURN OFF MEMORY MANAGEMENT 








Sth gy DMR=-11 oe toe MACY11 vindcatoness 


000004 
002352 
035354 


036276 
000002 
000006 


012562 


023516 


020120 


CLRVEC 


76$: 


PRINTB 


80$: 
SHUTDN 


JSR 
CALL 
85$: 
ENDTST 


- DSABL 


EMT22: .ASCIZ 


FMT25: .ASCIZ 


-EVEN 


sf; tee 


a6 

NXMF LG 
76$ 

35$ 

19, EMT22 


AMFMT25 RG 


PC, $HALT 
$ERROR 


LSB 
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T 14 = EXTENDED ADDRESSING DATA TEST 


sRESTORE TRAP 4 


:WAS THIS AN ERROR EXIT? 
;IF YES = REPORT ERROR 
START THE SECOND TEST 


; SHUTDOWN DMR 
;***% MACRO EXPANSION **** 
:DMR HALT ROUTINE. 


-KkKKK Kk 


'CHECK BASE TABLE AND REPORT ANY SOFT ERRORS 


:DISABLE LOCAL SYMBOL BLOCK 


L10074: 
TRAP 


/CAN'T ADDRESS EXTENDED MEMORY/ 


/%ZAMEMORY ADDRESS %06% DOES NOT RESPOND - TRAP 42N/ 


SEQ 0165 


#4 ,RO 
CSCVEC 


CSERDF 
EMT22 
0 


CSETST 


CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 ne. 


CZDMID.P11 29-JUL=81 11:32 


005737 
001035 


002306 
002300 


011070 


011266 


002324 
002276 


~SBTTL 


. . . . . . . 
ean een Hee Reese oF 


* 


Be Se Be Be Be Be Be Be Be Be Be Fe Ge Be Be Be Se Fe ‘oan 


BGNTST 


“7 YY - 5 
15 = DMC MODE 


K 13 
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TEST 


SEQ 0166 


TEST 15 = DMC MODE TEST 


MARLARASALARAAASLAAAAAASAAAAAAALAALALALALRARER ALAA AAAS ALA ASRS ESD S SDD S| 


© mee TEST 15 = DMR-11 
: IN THIS TEST THE DMR WILL TRANSMIT AND RECEIVE 7 BUFFERS. 


a BA/CC OUTS ape thy 3. AND TRANSMITS WILL BE ACCOUNTED FOR 
THE CHARACTER COUNTS 
THE RECEIVE/TRANSMIT T 
THE BUFFERS ARE DETERMINED IN THE SUBROUTINE SBUFFS. THIS 
SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF 


otras RECEIVE AND SEVEN 
TTEMPT 


AND 
oF atti ADDRESSES WILL BE CHECKED AGAINST 


TRANSMIT BUF THE ROUTINE WILL 


FERS. 
TO USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING 


HIERARCHY : 


BASE IN 
JSR 


ESCAPE 


A. IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32k. 


IF THERE IS FREE ar ABOVE THE SUPERVISOR GREATER 
THAN 2K BYTES, T MEMOR 
C. IF NEITHER OF THE PRECEED ING 


USE T Y 
TWO ARE POSSIBLE, USE 


THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC. 


SBUF FS 


PC, $MSCLR 


TST 


PC, S$BASEI 


—MARBASAAALA£LLLALAS ALARA LARASALEAASSAL SALAS EASA REAL ARS RASA SAAS ARAL ASS SS | 


T15: 
:DO WE NEED TO WRITE _fODEM 
:MAINTENANCE 1 OR e? 
SIF YES, WE CAN'T RUN THIS TEST. 
:# OF RCV & XMIT BUFFERS. 
[FLAG NOT TO USE RESUME. 
zFLAG SET TO REQUEST DMC MODE. 
:FLAG NOT TO REQUEST MAINTENANCE MODE. 


;DETERMINE 7 RCV & 7 XMIT RUFFERS 


MASTER CLEAR 
;****® MACRO EXPANSION **** 
; ISSUE A DMR MASTER CLEAR 


Patelalel akkk 


:I1F ERROR, EXIT TEST 


TRAP CSESCAPE 
-WORD 1L10075-. 


: ISSUE A DMR MODE Pate 
:IN DMR MODE, IF A SS a IS REQUIRED 
TO BE WRITTEN, - IT WILL BE DONE. 

y*xx«® MACRO EXP, ANSION ***%*% 

:CALL BASE IN ROUTINE WITH DEFAULTS 

;SET LINE UNIT LOOP 

BASE TABLE ADDRESS 


;DMR-11 MODE 


puxee arene 


zIF ERROR, EXIT TEST 


TRAP CSESCAPE 


L 13 
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CODMID. P11 TEST 


7978 
7979 


036442 
036444 
036444 


036450 
036450 
036452 


036454 


29-JUL=81 11:32 T 15 = DMC MODE 


000016 
SHUTDN 


004737 012562 JSR PC, $HALT 


ESCAPE TST 
104410 
000006 


CALL $INOUT 


40$: 
ENDTST 


104401 


sHALT 
jeee® MACRO EXPANSION *##« 
[DMR HALT ROUTINE. 


fxeae aan 


IF ERROR, EXIT TEST. 


. WORD 
As SETTING INTERFACE OR LOOPBACK MAINT. 
; (CAN'T BE DONE IN 


DMC MODE), 


: THIS ROUTINE WILL MANAGE AL 
; COMMANDS 


. WORD 


TRAP 


SEQ 0167 


L10075-. 


coescare 
L10075-. 


START IN 


THE DMR 
UED IN THE INTERRUPT ROUTINES 
BESJES 
; CONTROLL ING THE SOFTWARE TIMEOUT, THIS 
ROUTINE WILL ALSO CHECK THAT BUFFER 
[CHARACTER COUNTS AND ADDRESSES ARE CORRECT 
ZAND THAT THE DATA IS CORRECT IN THOSE BUFFERS 


ISS 
7 (FROM BASE IN UNTIL SHU 


T DOWN). 


110075: 


TRAP 


CSETST 


ee | 
















CZDMID.P11 


013737 


002254 
002254 
000007 
000001 
002276 
002300 


002336 


002324 
002274 


CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 vietnam 
29-JUL=81 11:32 


~SBTTL 


a a 


- DMR MODE (RESUME) INTERRUPT TEST 
TEST 16 = DMR MODE (RESUME) INTERRUPT TEST 


MARAASALALALALALALALALAALALALA LASALLE SEARS SALE R AREA AREA RAR ASRS ASA SS 


enennneneeue He eRe RRR HRB MOR as ** 


» 


TEST 16 = DMR-11 
MODE 


RESUME BASE _IN - 
* IN THIS TEST THE DMR WILL TRANSMIT AND RECEIVE 7 BUFFERS. DURING THE 
eI THE DMR be BE HALTED AND RES‘ARTED BY A BASE=IN RESUME IN THE 


IN 
MASTER CLEAR BASE IN RESUME 
MASTER CLEAR BASE IN RESUME 
BASE IN RESUME 
BASE IN RESUME 
MASTER CLEAR BASE IN RESUME 
HALT MASTER CLEAR BASE IN RESUME 
HALT MASTER CLEAR BASE IN RESUME 
HALT MASTER CLEAR BASE IN RESUME 
1 BA/CC IN TRANSMIT 
HALT MASTER CLEAR BASE IN RESUME 
ALL BA/CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND 
THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST 
THE RECEIVE/TRANSMIT TABLE. 
sp BUFFERS ARE DETERMINED IN THE SUBROUTINE SBUFFS. THIS 
hi na ., USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING 
A. IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32k. 
B. IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER 
THAN 2K BYTES, USE THAT MEMORY 


C. IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE 
THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC. 


LAER EERE EEE REE REEEEKEEKEEREEEEREEEEEREAEEEREREEEEREREREREKREREEEE SE 


BGNTST 


T16:: 
MOV DMTURN, TEMP 1 soa OFF LOOP TYPE 
CLR DMTURN sfonce INTERNAL LOOP 
A OF RCV & XMIT BUF FERS. 
FLAG SET TO REQUEST USE OF RESUME. 
CLR DMCMDE sFLAG CLEARED - DMR MODE. 
[FLAG NOT TO REQUEST MAINTENANCE MODE. 


SBUF FS DETERMINE 7 RCV & 7 XMIT BUFFERS 


M 13 
fr tes 12:42 PAGE 169 SEQ 0168 














CZDMID. P11 


036524 
036524 


036530 
036530 
036532 
036534 


004737 011070 


013737 002336 002254 


104401 


DMIDO DMR-11 Selb TESTS MACY11 sasalactest™ 
29-JUL=81 11:32 


NDTST 


st? UL-81 


CLEAR 
JSR 


ESCAPE 


CALL 


MOV 


PC, SMSCLR 


TEMP1 , DMTURN 
x 


N 13 
12:42 PAGE 170 
16 = DMR MODE (RESUME) INTERRUPT TEST 


SEQ 0169 


MASTER CLEAR 
;*x**% MACRO EXPANSION **** 
; ISSUE A DMR MASTER CLEAR 


PE telahel aene 


zIF ERROR, EXIT TEST 


TRAP CSE SCAPE 
«WORD 110076. 


3 THIS oe tes 4 MANAGE ALL THE DMR 
[COMMANDS ISSUED IN THE INTERRUPT ROUTINES 

: (FROM BASE IN. UNTIL SHUT DOWN). BESIDES 
[CONTROLLING THE SOFTWARE TIMEOUT, THIS 
SROUTINE WILL a20 CHECK THAT BUFFER 

; CHARACTER COUNTS AND ADDRESSES ARE CORRECT 
zAND THAT THE DATA IS CORRECT IN THOSE BUFFERS 


sRESTORE LOOP TYPE 


L10076: 
TRAP CSETST 


B14 
CZDMIDO DMR=11 one he TESTS MACY11 304 woe? st? YP. 5 12°42 PAGE 171 SEQ 0170 


CZDMID.P11 29=JUL-81 11:32 17 = DMR f DE INTERRUPT EXERCISE 
ted .SBTTL TEST 17 = DMR MODE INTERRUPT EXERCISE 
8087 en acee aes meek en et ee een 
$ TEST 17 = DMR-11 
8089 ie INTERRUPT DRIVEN EXERCISE 
Boer IN THIS TEST 64 BUFFERS WILL BE TRANSMITTED AND RECEIVED 
8092 fe ALL BA/CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND 
8093 3* THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST 
ade :* THE RECEIVE/TRANSMIT TABLE. 
+ 
8096 THE BUFFERS ARE DETERMINED IN THE SUBROUTINE S$B8UFFS. THIS 
8097 3* SUBROUT INE — DETERMINE THE ADDRESS AND CHARACTER COUNT OF 
8098 5* 64 RECEIVE AND 64 TRANSMIT BUFFERS. THE ROUTINE WILL 
8099 * ATTEMPT TO Use AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING 
8100 3* HiERARCHY: 
8101 3* A. IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32k. 
8102 3* B. IF THERE IS FREE MEMORY ABOVE _ SUPERVISOR GREATER 
8103 2 THAN 2K BYTES, USE THAT MEMOR 
8104 3* C. IF NEITHER OF THE PRECEEDING Two ARE POSSIBLE, USE 
deg :* THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC. 
+ 
8107 estitiitti tit tii titi tiititiiititititiiiiitiii titi iii t iti t tii t iti i es) 
8108 036550 BGNTST 
8109 036550 . T17 
ay 036550 012737 000100 002324 MOV #64. ,BUFNUM 34 OF RCV & XMIT BUFFERS. 
8112 036556 005037 002274 CLR RESUME ;FLAG CLEARED IN ORDER NOT TO USE RESUME. 
8113 036562 005037 002276 CLR DMCMDE ;FLAG CLEARED TO ALLOW DMR MO 
Bis 036566 005037 002300 CLR MNTMDE sFLAG NOT TO REQUEST MAINTENANCE MODE. 
aiS 036572 CALL $BUFFS ;DETERMINE 64 RCV & 64 XMIT BUFFERS 
8118 036576 CLEAR sMASTER CLEAR 
8119 y*x%x* MACRO EXPANSION ****% 
8120 036576 004737 011070 JSR PC, $MSCLR + ISSUE A DMR MASTER CLEAR 
8121 pk kk i kk & 
8122 
8123 036602 ESCAPE TST 7IF ERROR, EXIT TEST 
8124 036602 104410 TRAP CSESCAPE 
a4 036604 000012 -WORD 110077-. 
8127 036606 CALL $INOUT ; THIS ROUTINE WILL MANAGE ALL THE DMR 
8128 COMMANDS ‘iy ” THE INTERRUPT ROUTINES 
8129 ; (FROM BASE IN UNTIL SHUT DOWN). BESIDES 
8130 > CONTROLLING THES SOF TWARE TIMEOUT, THIS 
8131 ROUT INE WILL ALSO CHECK THAT BUFFER 
8132 ; CHARACTER COUNTS AND ADDRESSES ARE CORRECT 
Abs, + AND THAT THE DATA IS CORRECT IN THOSE BUFFERS 
aby 036612 CALL S$ERROR ;CHECK BASE TABLE FOR SOFT ERRORS 
8137 
8138 036616 ENDTST 
8139 036616 L10077: 
8140 036616 104401 TRAP CSETST 





CZDMIDO_DMR=11 ee leg | B'S MACY11 staeicasened” 


CZDMID.P11 
8141 


29-JUL-81 


C 14 
+e my 12:42 « DAGE 172 
- DMR MODE INTERRUPT EXERCISE 





SEQ 0171 






D 14 
et; i - 12:42 PAGE 173 SEQ 0172 
18 = DMR MODE LARGE MESSAGE 













CZDMIDO DMR=11 actif: ® TESTS MACY11 septate 
C2DMID. P11 29=JUL=81 11:32 


Bes .SBTTL TEST 18 = DMR MODE LARGE MESSAGE 
B144 omic an ggaaae °° ge sg N aracermt ak ements Sons ci perpen ate 
8145 $ TEST 18 = DMR-11 
8146 ce LARGE MESSAGE 
pt4 ‘* IN THIS MODE TRANSMIT AND RECEIVE 1 LARGE BUFFER 
8149 e THE BA/CC OUT RECEIVE AND TRANSMIT WILL BE ACCOUNTED FOR AND 
8150 :* THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST 
B23 :* THE RECEIVE/TRANSMIT TABLE. 
** 
8153 * THE BUFFERS ARE DETERMINED IN THE SUBROUTINE SBUFFS. THIS 
8154 3* SUBROUT INE _— DETERMINE THE ADDRESS AND CHARACTER COUNT OF 
8155 3* ONE RECEIVE AND ONE TRANSMIT BUFFER. THE ROUTINE WILL 
S28 * obi nal TO USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING 
3* H 
8158 3* A IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32k. 
8159 3* B. IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER 
8160 3* THAN 2K BYTES, USE THAT MEMORY 
8161 3* C. IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE 
Bice :* THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC. 
* 
8164 DIGI ICICI I IIIS III IIIT IIIT TT TTT OTTO AISI SIAR 
8165 036620 BGNTST 
aiep 036620 T18:: 
Ab 4 036620 012737 000001 002324 MOV #1 , BUF NUM 374 OF RCV & XMIT BUFFERS. 
8170 036626 005037 002274 CLR RESUME zFLAG CLEARED IN rye NOT TO USE RESUME. 
8171 036632 005037 002276 CLR DMCMDE aye CLEARED TO ALLOW DMR MODE. 
es 036636 005037 002300 CLR MT oe ;FLAG NOT TO REQUEST MAINTENANCE MODE. 
ai 036642 CALL $BUF FS ;DETERMINE 1 RCV & 1 XMIT BUFFER 
8176 036646 CLEAR sMASTER CLEAR 
8177 y**%* MACRO EXPANSION **** 
011070 JSR PC, $MSCLR ; ISSUE A DMR MASTER CLEAR 
pune Ke 
ESCAPE TST :1F ERROR, EXIT TEST 
TRAP CSESCAPE 
-WORD 1L10100-. 
CALL $INOUT ;THIS ROUTINE WILL MANAGE ALL THE DMR 


; COMMANDS ISSUED IN THE INTERRUPT thy 


ROUTINE WILL ALSO CHECK THAT BUFFER 
[CHARACTER COUNTS AND ADDRESSES ARE CORRECT 
AND THAT THE DATA IS CORRECT IN THOSE BUFFERS 


CALL $ERROR , i 3 BASE TABLE FOR SOFT ERRORS 
LLY ANY NON-ZERO ERROR COUNT IS 
REPORTED: HOWEVER IN THIS TEST A REP COUNT 
[OF 1 IS ALLOWED, BECAUSE AT LOW BAUD RATES 
SWE WOULD EXPECT 1 REP. 





E 14 
CZDMIDO DMR=11 Ng ts TESTS MACY11 30A(1052) of; Wes 12:42 PAGE 174 
CZDMID.P11 29=JUL=81 11:32 18 = DMR MODE LARGE MESSAGE 


82 036666 ENDTST 
8201 036666 L10100: 
asce 036666 104401 TRAP 


SEQ 0173 


CSETST 


F 14 
CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 sat STs 12:42 PAGE 175 SEQ 0174 


CZDMID.P11 29-JUL=81 11:32 T 19 = DMR MAINTENANCE MODE MESSAGE 
asus .SBTTL TEST 19 = DMR MAINTENANCE MODE MESSAGE 
BS02 a nes wae OD af aeteiiend fie ma ince eee cae 
07 ; TEST 19 = DMR-11 
4 is MAINTENANCE MODE OPERATION 
8210 je THE BA/CC OUT RECEIVE AND TRANSMIT WILL BE ACCOUNTED FOR AND 
8211 3;* THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST 
B55 y* THE RECEIVE/TRANSMIT TABLE. 
** 
8214 3* THE BUFFERS ARE DETERMINED IN THE SUBROUTINE SBUFFS. THIS 
8215 ad SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF 
8216 3* ONE RECEIVE AND ONE TRANSMIT BUFFER. THE ROUTINE WILL 
8217 * ATTEMPT hg USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING 
8218 s* HIERARCHY 
8219 3* A. IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32k. 
8220 3* B. IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER 
8221 3* THAN 2K BYTES, USE THAT MEMORY 
8222 3* C. IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE 
as67 ze THE 2k BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC. 
-& 
8225 TGS IEIIIIOSISIIISIISIOISIIIIDIOOIISIIIDIIOIOISIIIDUOIOIIIIOOOOIIIIUDODIONIIIDDS 
8226 036670 BGNTST 
8227 036670 T19 
54 036670 012737 000001 002324 MOV #1 BUF NUM 74 OF RCV & XMIT BUFFERS. 
8230 036676 005037 002274 CLR RE SUME ;DON'T ALLOW aor 
8231 036702 005037 002276 CLR DMCMDE sFLAG CLEARED TO ALLOW DMR MODE. 
asag 036706 012737 000001 002300 MOV #1 .MNTMDE sFLAG SET TO REQUEST MAINTENANCE MODE. 
aS 036714 CALL SBUF FS ;DETERMINE 1 RCV & 1 XMIT BUFFER 
8236 036720 CLEAR 7MASTER CLEAR 
8237 y**x® MACRO EXPANSION **** 
8238 036720 004737 011070 JSR PC, SMSCLR + ISSUE A DMR MASTER CLEAR 
8239 pk ke kkk 
8240 
8241 036724 ESCAPE TST 7 IF ERROR, EXIT TEST 
8242 036724 104410 TRAP CSE SCAPE 
Ber 036726 000012 «WORD L10101-. 
8245 036730 CALL $INOUT ; THIS ROUTINE WILL MANAGE ALL THE DMR 
8246 ; COMMANDS ISSUED IN THE INTERRUPT ROUTINES 
8247 (FROM BASE IN UNTIL SHUT DOWN). SIDES 
8248 CONTROLLING THE SOFTWARE TIMEOUT, THIS 
8249 by WILL ALSO CHECK THAT BUFFER 
8250 HARACTER COUNTS AND ADDRESSES ARE CORRECT 
ase) CAND THAT THE DATA IS CORRECT IN THOSE BUFFERS 
BSe2 036734 CALL $ERKOR ;CHECK BASE TABLE FOR SOFT ERRORS 
8255 
8256 036740 ENDTST 
8257 036740 110101: 


8258 036740 104401 “ TRAP = CBETST 





G 14 
CZDMIDO DMR-11 rh TESTS MACY11 pag eb on 29-JUL=81 12:42 PAGE 176 SEQ 0175 
CZDMID.P11 29=JUL=81 11:32 ARDWARE PARAMETER CODING SECTION ; 


8259 -SBTTL HARDWARE PARAMETER CODING SECTION 


8262 SUIIOISIIGIIIIIIS ISIC ISI ICISIIISIICIIIIOIIUIIIOIUIIUIIIISIIIOIIIOIIIOIUIOIIDIIUIIOIIOOIOIOIUIOIOIOIO TI ot 


THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 


MACROS ARE EXE 

INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. _THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 


SEEKER EEE KEKE EEREEKEEEREEEEEEEEEEEE 


82 

8271 036742 BGNHRD 

8272 036742 000015 -WORD L10102=L $HARD/2 
8273 036744 LSHARD: : 


8275 036744 GPRMA_ - P1,2,0,160000,177776,YES 

8276 036744 00103i «WORD TSCODE 
8277 036746 036776 «WORD P1 

8278 036750 160000 «WORD TS$LOLIM 
8279 036752 177776 «WORD TS$HILIM 
8280 036754 GPRMA = P2,4,0,0,776,YES 

8281 036754 002031 . WORD -_ 


8283 036760 000000 «WORD TS$LOLIM 
8284 036762 000776 -WORD TS$HILIM 
8285 036764 GPRMD P3,20,0,7,0.7,YES 

8286 036764 010032 - WORD a 


8288 7 

8289 036772 000000 -WORD TS$LOLIM 
Bon 036774 000007 «WORD TS$HILIM 
8292 036776 ENDHRD 

8293 - EVEN 

036776 L10102: 


036776 051503 020122 042101 P1: eASCIZ /CSR ADDRESS: / 
8297 037004 aN | 051505 035123 


8299 037014 042526 052103 051117 Pe: -ASCIZ /VECTOR ADDRESS: / 
8300 fk 3 040440 042104 042522 


007, 000 
8302 037035 124 051505 020124 P3: eASCII /TEST CONFIGURATION ~/<CR><LF> 
037042 3116 3511 


006455 
8306 037063 040 030040 036440 ASCII / OQ = INTERNAL (NO CONNECTOR) /<CR><LF> 


H3254 - V.35 (NOTE: Movc 1-4 ALLOWS/<CR><LF> 


8312 Oar les 020040 020061 SON? ASCII / 1 
8314 037136 020055 027126 052463 





_——————— 


| H 14 
| CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052) 29=JUL=81 12:42 PAGE 177 SEQ 0176 
gan 29-JUL=81 11:32 HARDWARE PARAMETER CODING SECTION 

8315 037144 020040 020040 020040 

8316 037152 047050 052117 035105 

8317 037160 020040 047515 042504 

8318 037166 030440 032055 040440 

8319 037174 046114 053517 006523 

8320 037202 ~—012 : 

8321 037203 031040 036440 eASLII / 2 = H35254 = INTEGRAL PROGRAM INTERFACE SELECTION)/ 

B322 037210 044060 031063 032065 


8330 037270 005015 020040 020063 eASCII <CR><LF>/ 3 = H3255 = RS232C/<57>/423/<CR><LF > 
037304 0 

8333 037312 031462 041462 032057 

8334 037320 031462 005015 

8336 037324 020040 020064 020075 ASCII / 4 

8337 037332 031510 032462 020065 

8338 te oy 020055 abe 5 031064 


0 6 01 
8340 037351 040 Sapte 036440 «ASCII / 5 = CABLE AND SW PACK INTERFACE SELECTED/<CR><LF> 


H3255 


RS422/<CR><LF> 


0374 040506 503 
8346 037414 oadht4 va + { 042524 
8348 037425 040 020040 020040 ASCII / (V.35-H3250, INTEGRAL-BC55A-10,/ 


1055 
8353 037462 032503 040465 030455 
8355 037472 051040 031123 031063 eASCII / RS232C-H325, RS423/<57>/422-H3251)/<CR><LF> 
8356 037500 026503 031510 032462 
8357 037506 020054 Oe loee 031064 
8359 037522 031510 032462 024461 
8360 937530 01 
Bae) 237532 020052 042523 042514 eASCII /* SELECT THE FOLLOWING ONLY IF THE MODEM SUPPORTS LOOPBACK */ 


3970 037620 040502 045503 025040 





SDMID. P11 


037626 


3 
037674 


29-JUL=81 


020040 
047514 
047514 


020067 
047515 
047517 
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HARDWARE PARAMETER CODING SECTION 


020066 «ASCII <CR><LF>/ 6 = LOCAL LOOP/<CR><LF> 
040503 

050117 

020075 eASCIZ / 7 = REMOTE LOOP/<CR><LF> 

042524 

006520 


EVEN 


SEQ 0177 





CZDMIDO DMR=11_ FUNCTIONAL TH i MACY11 


CZDMID.P11 


8409 
8410 


RERRRRERR 
WO\NAULSWN— 


8420 


037676 


037710 
037712 
037712 
037712 


040072 
040074 
040074 


29-JUL=81 1 


000005 


000032 
037712 
000007 
000001 
000005 


042523 


042514 


052103 
050040 


030475 


J 14 
30A(1052) 29=JUL=81 12:42 PAGE 179 
SOFTWARE PARAMETER CODING SECTION 


-SBTTL SOFTWARE PARAMETER CODING SECTION 


DAR RIAISIIEIIISISIISOIIIDOIIISIEISISOIIUIIUIIOUIDIIDIOUIO Inn nit ititntititnit 
; THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 

3; THAT ARE USED BY THER SUPERVISOR TO BUILD P=TABLES. THE 

; MACROS ARE NOT EXECUTED AS MACHINE iNSTRUCTIONS BUT ARE 

; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 

3 DIT THE OPERATOR THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 

; @ 


Pl Lae Bh, pepe ote REET NE SOD ED HON REE 


«WORD L10103=L$SOF T/2 


BGNSF 7 
LESOFT:: 
GPRMD S1,0,0.7,1,5,YES 
- WORD 
«WORD 
. WORD 
« WORD 
- WORD 
ENDSF T 
- EVEN 
L10103: 
$1: ASCII /SELECTABLE PROGRAM LOOP TIME-OUT VARIABLE/<CR><LF> 
eASCIZ /CREFER TO LISTING 6.3.13] (MAX=5; MIN=1) / 
-EVEN 
pO RR kk tk tk PATCH AREA RRR EERE REE REE EEEER E R 
PATCH: 
=.+20. 
NOP 
NOP 
NOP 


PERERA REE EERE ERE EERE REED 


ENDMOD 


LASTAD 
-EVEN 


SEQ 0178 


TSCODE 
$1 


7 
TSLOL IM 
TSHILIM 





K 14 
12:42 PAGE 180 
FTWARE PARAMETER CODING SECTION 


‘Senib DMR=11 oa + ET MACY11 wag hs Set 


SEQ 0179 
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CZDMID.P11 29-JUL=81 11:32 CROSS REFERENCE TABLE == USER SYMBOLS 













a = 000044 16404 5340 5401 5447 5451 
ADR _= 000020 G 15164 
ASSEMB= 000010 1231 
x3 002304 17248 2533 4177* 4181* 4186* 4191* 4196* 4202* 4384 
BACCR = 16124 4359 4570 6636 6712 6946 7145 7206 7284 7386 706 
BACCT = 16084 4361 4590 6334 440 6644 6727 6845 6957 7220 7398 7714 
BASE 002640 18574 2840 3607 609 3614 616 3623 625 3630 32 3639 3641 3646 
3648 3655 3657 3662 664 4418 5313 5324 5336 5338 5340 2 344 
5374 5385 5397 5399 5401 5403 5405 5424 5428 5435 5439 5447 5451 
5458 5462 5469 5473 561 586 5600 22 5651 5693 5695 697 6 
5701 5729 735 5739 5746 5750 5757 5761 5768 5772 5779 5783 5876 
5918 5937 5988 6011 044 6123 6296 6404 6475 6477 6499 6501 6544 
6613 6693 6792 6927 7031 7042 7196 7271 7363 7673 7972 
BASEI = 000003 16114 2483 3300 4363 531 4646 
BASEUP= 020000 15764 
BIGBUF 004240 18694 3176 
BITO = 000001 G 14894 1601 2396 3173 3244 4557 4577 5139 5586 5622 
BITOO = 000001 G 14784 1489 
BITO1 = 000002 G 1477# 1488 
BITO2 = 000004 G 14764 1487 
BITO3 = 000010 G 14754 1486 
BIT04 = 000020 G 14744 1485 
BITO5 = 000040 G 14734 1484 
BIT06 = 000100 G 1472# 1483 
BITO7 = 000200 G 14714 1482 
BITO8 = 000400 G 14704 1481 
BITO9 = 001000 G 14694 1480 
BIT] = 2G 14884 1600 6011 
BIT10 = 002000 G 14684 1558 1583 1584 
BIT11 = 000 G 14674 1557 1581 
BIT12 = 010000 G 4 1556 1578 1580 
BIT13 = 020000 G 14654 1555 1576 4476 4486 
BIT14 = 040000 G 14644 1554 4465 4482 4486 4659 4670 6567 6638 6729 7699 7702 7852 
BIT15 = 100000 G 14634 1553 4670 6567 6638 6729 7849 
BIT2 = 000004 G 14874 1569 1598 1599 
BITS = 000010 G 14864 1596 1597 4186 
BIT4 = 000020 G 14854 1566 1595 4181 5324 5385 5899 5918 5956 6839 
BiTS = 000040 G 14844 1565 1594 
BIT6 = 000100 G 14834 1563 1573 1592 1593 4191 
BIT7 = 000200 G 14824 1562 1572 1591 
BIT8 = 000400 G 14814 1560 1586 1587 1590 
BIT9 = 001000 G 4804 1559 1585 
= 000400 G 15204 
BSELO = 002232 in 2483* 2525* 2581* 2703* 2781* 3300* 4541* 4546* 4550* 4565* 4570* 4585* 
* 
BSEL1 002242 6864 4095* 4096* 
wSEL2 = 002234 16874 
BSELS3 002244 16884  2389* 3553 3563 3581 4099* 4100* 5238 5248 5257 
BSEL4 = 002236 16894 
BstiS 002246 16 4103* 4104* 
BSEL6 = 002240 16914 2508 4939 4991 4995 5105 6153 6202 6235 
BSEL7 002250 16924 2533* 4107* 4108* 4384* 4940 4992 4996 5109 
BUFNUM 002324 17534 3143 3148 3182 3184 3225 3236 3283 3284 3285 3286 3339 3457 
3474 3475 3476 3477 7950* 8055* 8110* 8168* 8228» 





3197* 3464 





BUFSIZ 002322 
cD = 002000 


mm nn 
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CZDMID.P11 29-JUL=81 11:32 CROSS REFERENCE TABLE == USER SYMBOLS 


CHIPNO 002414 18014 
CLRNO 002400 17914 2396 2409* 4028* 
CMD = 000007 1629% 2639 2940 4736 6349 6370 6379 6592 6672 6754 7071 7124 7175 











7250 7314 7516 7825 
CNTRL = 000007 16094 2216 2224 2519 2581 2621 2923 4365 4550 4619 6352 6453 6558 
6575 6629 6654 6720 6737 6879 6951 6970 7035 7054 7086 7107 7139 
7158 7214 33 7278 7297 7415 7730 
COUNT 002416 18024 2169* 2191* 6861 
= 000015 16624 8302 8306 8312 8330 8336 8340 8355 8371 8375 8408 
CSR 002232 16804 1684 1685 4094* 4283 £62 
CTS = 010000 15804 
C$AU_ = 000052 12314 
CS$AUTO= 000061 12314 4306 
CS$BRK = 000022 12314 2190 2314 2418 3305 
C$BSEG= 000004 12314 
C$BSUB= 0°.1002 12314 4923 4968 5099 5299 5359 5547 5637 5863 5932 5975 6025 6110 
6179 6283 6391 6531 6600 6680 7020 7079 7132 7183 7258 
CSCEFG= 000045 12314 
CSCLCK= 000062 12314 
CSCLEA= 000012 12314 4332 
C$CLOS= 000035 12314 
C$CLP1= 000006 12314 
CS$CVEC= 000036 12314 3162 4039 4294 4841 7564 7638 7876 
CSDCLN= 000044 12314 4301 4836 
000051 12314 4299 4834 
CSORPT= 000024 12314 
= 000053 12314 4777 
CSEDIT= 000003 12314 1310 
CSERDF= 000055 12314 2207 2227 2329 2433 2624 2633 2926 2935 3328 3354 3373 4374 
4613 4628 4651 4664 4699 4708 4718 4855 5048 5072 5120 5265 5329 
348 5390 5409 5590 5626 5705 5902 5921 5959 6014 6157 6206 6355 
6364 6456 6465 6481 6578 6587 57 6666 6740 6749 6891 
6973 6983 7057 7110 7119 7161 7170 2 7245 73 7418 
7432 7442 7451 7463 7473 7482 7500 7507 7642 7733 7744 7754 7763 
7772 7782 7791 7818 7882 
CSERHR= 000056 12314 
SERRO= 12314 
CSERSF= 000054 12314 
CSERSO= 000057 12314 2863 
CSESCA= 000010 12314 5236 5255 5306 5318 5366 5379 5554 5566 5577 5584 5613 5620 
5644 5656 5667 5684 5691 5870 5881 5890 5916 5948 5982 5993 
6033 6047 6053 6117 6128 6140 6150 6167 6190 6199 6301 
6310 6327 6345 6377 6398 6418 3 5 6538 6549 6556 
8 7 6687 98 6707 6718 6786 6810 6821 6830 5 9 6921 
6932 6941 6968 7052 7105 7156 7190 7201 7212 7231 7265 7276 7 
7352 73 7371 7380 7392 74 7661 7676 7681 7690 7710 7718 7727 
7963 7977 7984 8124 8182 8242 
C$SESEG= 000005 12314 
C$ESUB= 000003 12314 4963 5095 5147 5355 5416 5633 5712 5928 =. 5971 6021 6062 6175 
6222 6387 6489 6596 6676 6758 7075 7128 7179 7254 7318 
C$ETST= 000001 12314 4845 5151 5272 5420 5715 6068 6226 6492 6762 6904 6999 7322 
7534 7904 8002 8083 8140 8202 8258 
C$EXIT= 000032 12314 


N 14 
IDO DMR=11_ FUNCTIONAL TESTS MACY11 30A(1052) 29=-JUL=81 12:42 NPAGE 184 ; SEQ 0182 


CZDM 
CZDMID.P11  29-JUL=81 11:32 CROSS REFERENCE TABLE == USER SYMBOLS 
= 000042 12318 4076 
C$GPLO= 000030 12314 
= 000040 12318 
C$INIT= 000011 12318 4234 
CSINLP= 000020 12314 
CSMANI= 000050 12314 
CSMEM = 000031 12318 3164 
CSMSG = 000023 1esi# 3496 352935923673 3702-3730 5745-3759 3775 S482 S792 244 
CSOPEN= 000034 12314 | 
C$PNTB= 000014 1231# 2222 2260 2617 36438 3446 3454 3461 3468 3484 3492 3508 3517 
3525. 3540 3549 3559 3569 3577 3587 3604 3620 3636 3652 3668 3683 
3691 3698 3710 3718 3726 3741 3755 «=3771 = 4091S 4139») 4223 4935 = 4950 
5060 5084 5133 5244 5452 S445 54355466 54775725 5735 STKE 5754 
5765 5776 5787 62460 6505 7651 7891 
CSPNTF= 000017 1231 4772 
CSPNTS= 000016 12314 
CSPNTX= 000015 1231# 4867 
C$QI0 = 000377 12314 
000007 12314 
CSREFG= 000047 1231# 4043 4048 4053 4058 
C$RESE= 000033 1231# 4766 
C$REVI= 000003 12314 1309 
C$RFLA= 000021 12314 
C$RPT = 000025 12314 
C$SEFG= 000046 12314 
C$SPRI= 000041 12314 3095 3297 3412 4022 7581 
C$SVEC= 000037 1231 3082 4142 «4149 «= 4280 = 4811S 7558 = 7611S 7863 
CS$TPRI= 000013 12314 
DDMC = 000010 16164 
DFPTBL 002174 G 14094 
DIAGMC= 000000 1231 
DISCON= 000100 1592 
DMCMDE 002276 1719# 3012 4027* 4420 4496 4525 7952 8057* 8113* 8171*  8231« 
DMR = 000522 1587# 4422 5314 5562 5601 5652 5877 5938 5989 6045 6124 6297 6405 
6545 6567 6614. 6694 = 6793-6928 = 7032-~S 7043S 7197 )=— 7272, 73864 7674S 7973 
DMRFLG 002260 17064 2513* 2516* 2597 2603  2605*  7089* 
DMRRUN= 000040 1594# 2630 4623 
DMRVEC 002226 1678# =4122* 4140 
DMTURN 002254 16984 3018 4153* 4179 4184 4189 4194 4208 4210 4213 4215 4396 4437 
6035 7354 7664 8053  8054* 8080s 
DMTVEC 002230 1679# = 4123% 4132" = 4147 
DTR = 000100 15934 4397 4401 
DXERR = 000007 16154 5607 
EF .CON= 000036 G 14 4057 
EF -NEW= 000035 G 14978 4052 
EF -PWR= 000034 G 14988 
EF -RES= 000037 G 1495# 4047 
EFSTA= 000040 G 14944 4042 
EMG] 017716 2209 2331 2435 3926 
EMG10 020067 3945# 7434 7746 
EMG11 020116 3949" 4666 4701 4720 7444 7475 7756 7784 
EMG12 020141 3356 «©=—- 39534 «4710 «7453. 7484 = 7765S 7798 
EMG13 020167 3957H 7465 = 7774 
EMG14 020215 3961" ©7502 


EMG15 020235 3375 39644 7509 7820 








: B 15 
CZDMIDO DMR=-11 wette og ® TESTS MACY11 30A(1052) 29=JUL=81 12:42 B PACE 185 
CZDMID.P11 29-JUL=81 11:32 CROSS REFERENCE TABLE == USER SYMBOLS 


EMGI6 020250 3966" © 4653 

EMGI7 020301 3971" 4376 

EMGI8 020353 3979" 4615 

EMGI9 020402 6869 

EMG2 017727 3330 © 39284 

EMGB 017774 2626 3955 6357 6458 6580 66596742688 

EMG9 020040 2229 2635 «39414 += 4630 6366 «= 6467 6589 = 6668 
71727247, 7311S 7420-7735 

EMS3 012540 2865 28764 

FMSG 012724 2928 2937-2945 

EMTO 024120 4857 = 48744 

EMT] 025472 5050 5074 51854 

EMT10 030604 5923 6074s 

EMT11 030632 5961 60784 

EMT12 030666 6016 60834 

EMT13. 031226 6159 6208 62474 

EMT2 025512 5122 51884 

EMT20 032026 6483 65114 

EMT22 036240 7644 7884 79078 

EMTS 646 5267 52 74M 

EMT4 026374 5331 5484# 

EMTS 026421 5350 5411 54884 

EMT6 026467 5392 5495¢ 

EMT? 027574 5592 5628 = 5795# 

EMTB 027625 5707  5800# 

EMTS 54 5904 6070# 

END 021510 4061 4228 «= 42314 

ERRFLG 002362 1779# 2168" = 2211 = 2231* = 2249 «= 2297% = 2333" = 2341 

ERRG] 014616 G 3331 34328 

ERRGIO 016164 G 3357-37344 

ERRG11 016216 G 37484 

ERRG12 016250 G 3376 © 37624 : 

ERRG2 015124 G 2210 2230 2332 2627 2636 2929 2938 + «= 3500" 


7821 
ERRGS 015240 G 2436 35324 5268 
ERRGS 015470 G 2866 35 
ERRG7 015764 G 36784 4721 
ERRG8 016062 G 37054 4702 4711 


ERROR 002366 17854 2216 2519 4025* 6558*  6593* 6629*  6673* 
7072* = 7086* 7125* 7139*% 7176* 7214* 7251* 7278» 


ERRT1 026154 G 5351 5412 54234 
ERRT2 031174 G 6160 6209 62324 
ERRT3 027266 G 5708 57184 

ERRTS 031770 G 6484 64964 

EVL = G 15144 

EXERR = 16144 5571 

ESEND = 002100 12314 

$LOAD= 12314 1333 

FINIT1 021512 4088 42354 

FINIT2 021601 4116 42454 

FINITS 021670 4220 42554 

FLAG 002344 17664 4969* 5043 5046* 5067 5070* 5100* 5115 


6975 
6751 


5118* 


7059 
6893 


6755* 


7112 
6985 


6951* 


SEQ 0183 


7163 
7068 


6989* 


7238 
7121 


7035* 





C 15 
CZDMIDO DMR-11 Aa -— ™ TESTS MACY11 30A(1052) 29=JUL=81 12:42 « BAGE 186 SEQ 0184 


CZDMID.P11 — 29=JUL=81 11:32 CROSS REFERENCE TABLE -- USER SYMBOLS 
FMDROP 023670 4769  4780# 

FMG1_ 016302 3443 3514 3546 37824 5722 
FMGIO 016715 3665 38308 

FMG11 016753 3707 38364 

FMG12 017005 3680 38414 

FMG13. 017036 3688 3715 3846# 

FMGI4 017112 3723 38544 

FMG15 017166 95 38624 

FMG16 017215 3738 6H 

FMG17 017274 375238748 

FMGI8 017347 3768 38824 

FMGI9 017436 3584 38924 5241 

FMG2 016334 3451 3522 37874 

FMG21 017461 3458 38964 

FMG22 017527 65 39034 

FMG23 017554 3481 39074 

FMG24 017635 3489  3916# : 
FMG3 016366 3435 3505 3537 3601 37928 
FMG4 016440 3556 3799" 

FMGS «016471 3566 863574 «38044 

FMG7 016522 So17 $809" 6502 


3762 3998 
4922 4962 
5306 5318 
5577 55 

5718 5860 
5993 6002 
6128 6140 








CZDMIDO DMR-11 ete TESTS MACY11 30A(1052) 29-JUL-81 

CZDMID.P11 29-JUL-81 11:32 
6327 6345 6377 6386 6390 
$528 6530 6538 6549 6556 
6698 6707 6718 6757 6761 
6914 6921 6932 6941 6968 
7131 7156 7178 7182 7190 
7317 7321 7334 7352 7366 
7681 7690 7710 7718 7727 
8082 8109 8124 8139 8166 

| FSCLEA= 000007 12314 4323 4331 

F$DU = 900016 12318 4763 4776 

FSEND = 000041 12314 1234 3497 3530 3593 
4333 4602 4741 4753 4778 
4967 5094 096 5098 5146 
5296 5298 5306 5318 5354 
5483 5544 5546 5554 5566 
5656 5667 5684 5691 5711 
5890 5916 5927 5929 5931 
6020 6022 6024 6033 6047 
6128 6140. 6150 6167 6174 
6245 6280 6282 62 6301 
6409 6418 6435 6451 6488 
6556 6595 6597 6599 6607 
6718 6757 6759 6761 6763 
6905 6914 6921 6932 6941 
7078 7105 7127 7129 7131 
7253 7255 7257 7265 7276 
7371 7380 7392 7404 7533 
7727 7903 7905 7946 7963 
8109 8124 8139 8141 8166 
8407 8434 

FSHARD= 000004 12314 8272 8293 

FSHW = 000013 12314 1407 1424 

FSINIT= 12:14 4018 4233 

FSIMP = 000050 12314 

FSMOD = 12314 1234 8434 

FSMSG = 000011 12314 3432 3495 3500 3528 
ito} 3744 3748 3758 3762 

FSPROT= 000021 12314 3998 4005 

FSPWR = 000017 12314 

FSRPT = 000012 12314 

FSSEG = 000003 12314 

FSSOF T= O00CO05 12314 8394 8405 

FSSRV = 000010 12314 4345 4600 4607 4739 

F$SUB = 000002 12314 4923 4962 4968 5094 
5637 5711 5863 5927 5932 
6221 6283 6386 6391 6488 
7079 7127 7132 7178 7183 

FSSW = 000014 12314 1439 1446 

FSTEST= 000001 sexe 4805 4844 4921 5150 





D 15 
12:42 PAGE 187 
CROSS REFERENCE TABLE == USER SYMBOLS 


3532 
3774 


3591 
5423 


3596 
5481 


3672 
5718 


3678 
5791 


3701 
6232 


SEQ 0185 


3705 
6243 


3729 
6496 


E 15 
CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052) 29=JUL=81 12:42 PAGE 188 SEQ 0186 


CZDMID.Pi1 29-JUL-81 11:32 CROSS REFERENCE TABLE -=- USER SYMBOLS 

GSEXCP= 000400 12314 

GSHILI= 000002 12314 

G$LOLI= 000001 12314 

G$NOQ_ = 12314 

GSOF F S= 12314 8276 8281 8286 8398 

GS$OF SI= 000376 12314 8276 8281 8286 &398 

GSPRMA= 000001 12314 8276 8281 

GSPRMD= 000002 12314 8286 8398 

GSPRML= 000000 12314 

G$RADA= 000140 12314 

G$RADB= 12314 

G$RADD= 12314 

G$RADL= 000120 12314 

= 000020 12314 8276 8281 8286 8398 ' 

GS$XFER= 12314 

G$YES = 000010 12314 8276 8281 8286 8398 

HALTC = 001000 15854 2932 4621 7063 7116 7167 7242 7306 

HDX = 002000 15834 5944 é 

HELP = 12244 1251 1351 1392 1904 

HICRC 0024 17974 = 4979* 5020* 5026 5027* 5028*  5064* 5065 5079 

HIWORD 002410 17994 4992~ 4996* 5021* 5065 5078 

HLT = 000002 16104 2900 4371 4516 4565 4585 

HOE = 100000 15274 

IBE = 010000 G 15244 

IDU = 000040 G 15174 

IECLR = 000020 15 3382 4502 4508 

IEOQ = 000100 15734 3383 4429 4644 4733 

IER = 020000 G 15254 

IESET = 100 15634 3300 3382 4541 4546 4550 4565 4570 4585 4590 4646 

INFACE 002262 17094 2517 4198* 4201* 4539 

INFLAG 002354 17724 =3287* 3309 4520 4593* 4634 

INISR 022064 G 4139 43454 

INRCV 002326 17564 3283* 3470* 3474* 3480 4450* 4553 4557 

INTER = 000015 16254 2525 4369 4533 4541 

INXMIT 002330 1757#@ = =93284* = 3471* 83475" 3479 4458* 4573 4577 

1SP13 = 000076 16494 5586 5622 5729 

ISP7 = 000072 16484 5324 5385 5918 6011 

ISR = 000100 G 15184 

IXE = 004000 G 15234 

I$AU_ = 000041 12314 

ISAUTO= 000041 12314 42734 43074 

ISCLN = 000041 12314 43234 43334 

I$DU_ = 000041 12314 47634 47784 

ISHRD = 000041 82724 82954 

ISINIT= 000041 12314 40184 42354 

ISMOD = 000041 12314 12344 84344 

I$MSG = 000041 12314 34324 34974 35004 35304 35324 35934 35964 36744 36784 37034 37054 37314 
ritae 37464 37484 3760 3762 37764 54234 54834 57184 57934 62324 62454 64964 

I$PROT= 000040 12314 39984 

I$PTAB= 000041 12314 

I = 000041 12314 

ISRPT = 000041 12314 

I$SEG = 000041 12314 4804 4920 4922 4967 5098 5229 5296 5298 5358 5544 5546 5636 
5860 5862 5931 5974 6024 6106 6109 6178 6280 6282 6390 6528 6530 
6599 6679 6779 6914 7017 7019 7078 7131 7182 7257 7334 7550 7946 





-— 


CZDMID.P11 
ISSETU= 000041 
ISSFT = 000041 
I$SRV = 000041 
'$SUB = 000047 
ISTST = 000041 
JSJIMP = 000167 
LAST 002364 
LF = 000012 
LLOOP = 

LOCATE 024042 G 
LOCRC 002402 
LOE = 040000 
LOGDEV 002370 
LOT = 000010 
LOWORD 002406 
LPLU = 

L$ACP) 002110 G 
L$APT 002036 G 
L$AUT 092070 G 
LSAUTO 021756 G 
LS$CCcP 2106 G 
LSCLEA 022046 G 
L$CO 002032 G 
LSDEPO 002011 G 
LSDESC 010246 G 
LSDE 002076 &G 
LSDEVP 002 G 
LSDISP 002124 G 
L$DLY 002116 G 
L$DTP 2040 G 
LSDTYP 002034 G 
L$DU 023640 G 
L$DUT 002072 G 
L$DVTY 010240 G 


29-JUL-81 11:32 


47634 
18834 


8166 


2320 


8227 


2424 


F 15 
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CROSS REFERENCE TABLE ~= USER SYMBOLS 


47414 47468 47534 48494 48734 
49624 49644 49674 50944 0 0984 
3584 54154 54174 5544 54 56324 
59294 59314 59704 59724 59748 60204 
1764 1784 62214 62234 6280 62824 
65954 65974 6599 66754 66774 66794 
70764 70784 7127# 7129% 71314 71784 
7334 7550 7946 8052 109 8166 
49204 4922 4967 5098 51504 51524 
5306 5318 5358 5366 5379 54194 
5613 5620 5636 5644 5656 5667 
5881 5890 5916 5931 5948 5974 
053 60674 60694 61064 6109 6117 
62254 62274 62804 6282 6290 6301 
6418 6435 6451 64914 64934 65284 
6627 6679 6687 6698 6707 6718 
6851 6859 69034 69054 69144 6921 
7052 7078 7105 131 7156 7182 
7295 73214 73234 73344 7352 7366 
7661 7676 7681 7690 7710 7718 
80014 80034 80524 8068 80824 80844 
82034 8227# 8242 82574 82594 
4533 4535 
8330 8336 8340 8355 8371 8375 
5016* 5017*  5039* 5040 5055 
4075 4298 4768 4833 4931 
040 5054 
5599 5650 5875 5936 5987 6037 
6791 6926 7030 7041 7195 7270 
3317 


6040 
7356 


SEQ 0187 


6122 
7359 


6295 
7666 


pi 


G 15 

CZDMIDO DMR=-11 Nate og TESTS MACY11 30A(1052) 29=JUL-81 12:42 PAGE 190 SEQ 0188 
CZDMID.P11 29-JUL=81 11:32 CROSS REFERENCE TABLE == USER SYMBOLS 
LSEF 002052 G 13114 
LSENVI 002044 13044 
LSETP. 002102 G 13344 
LSEXP1 002046 G 13064 
LSEXP4 002064 G 13204 
LSEXPS 002066 G 13224 
LSHARD 036744 G 1283 8272 82734 
LSHIME 2120 G 13484 3089 7575 7838 
LSHPCP 2016 G 12824 
LSHPTP 002022 G 12864 
$HW 002174 G 1287 1407 14084 
L$ICP_ 002104 G 13364 
LSINIT 020452 G 1337 40184 
LSLADP 002026 G 12904 
LSLAST 040100 G 1291 84394 
L$LOAD 002100 G 13328 
L$LUN 002074 G 13284 
LSMREV 002050 G 13084 

002000 G 12654 
LSPRIO 002042 G 13024 
L T 020444 G 1343 39984 
L$PRT 002112 G 13424 
LSREPP 002062 G 13184 
L$REV_ 002010 G 12744 
L$SOFT 037700 G 1285 8394 83954 
L$SPC_ 002056 G 13144 
L$SPCP 002020 G 12844 
L$SPTP 002024 G 12884 
L$STA 002030 G 12924 
L$SwW 002224 G 1289 1439 14404 
L$TEST 002114 G 13444 2849 2851 3384 
LSTIML 002014 G 12804 
L$UNIT 002012 G 12784 4072 
L10000 002222 1407 14244 
10001 002226 1439 14464 
L10002 015122 34954 
L10003 015236 
L10004 015466 35914 
L10005 015762 36724 
L.Y006 016060 37014 
L10007 016162 3729# 
L10010 016214 37444 
L10011 016246 37584 
L10012 016300 37744 
L10014 021510 42334 
L10015 022044 43054 
L10016 022062 43314 
L10017 023140 46004 
L10020 023626 47394 
L10021 023636 47514 
L10022 023666 47764 
L10023 024040 48444 
L10024 024116 48714 
L10025 025202 51504 
L10026 024404 49624 


L10027 025026 50944 

















CZDMID.P11 29-JUL=81 11:32 

L10030 025200 51464 

L10031 025644 5237 5256 

L10032 026152 5307 5319 

L10033 026022 53544 

L10034 026150 54154 

L10035 026372 54814 

L10036 027264 5555 5567 

L10037 027104 56324 

L10040 027262 57114 

L10041 027572 57914 

L10042 030552 5871 5882 

L10043 030270 59278 

L10044 030360 59704 

L10045 030454 : 60204 

L10046 030550 60614 

L10047 031160 6118 6129 

L10050 031060 61744 

L10051 031156 62214 

L10052 031224 62434 

110053 031766 6291 6302 

L10054 031560 63864 

L10055 031764 64884 

L10056 032024 65084 

L10057 032552 6539 6550 

L 032204 65954 

110061 032 66754 

L10062 032550 67574 

L10063 032776 6787 6811 

L10064 033156 6922 6933 

L10065 034062 7053 7106 

L10066 033306 70744 

L10067 033424 71278 

L10070 033542 71784 

L10071 033720 72534 

L10072 034060 73174 

L10073 034612 7367 

L10074 036236 7662 7677 

L10075 036460 9 7978 

L10076 036546 8069 80824 

L10077 036616 8125 81394 

L10100 036666 8183 82014 

L10101 036740 8243 8257# 

L10102 036776 8272 82944 

L10103 037712 8394 84064 

MAINT = 000400 15864 2595 

MAINT1= 000010 15964 3021 

MAINT2= 1599# 3020 
002310 17354 4205 

MCLR = 15544 2398 

MDIAG = 02 15554 2401 

MICRO 002256 16994 

MMANAG 002302 17214 3092* 

MNTMDE 2300 17204 4407 

MNTRE C= 10 1597# 

MODEM 031162 6132 62284 


CZDMIDO DMR=11 ee og | TESTS MACY11 30A(1052) 


29-JUL=81 


H 15 
12:42 PAGE 191 


CROSS REFERENCE TABLE == USER SYMBOLS 


52718 
5367 


5578 


5891 


6141 


6311 


5380 


5585 


5917 


6151 


6328 


3340 
8058* 


5435 


54194 

5614 5621 
5949 5983 
6168 6191 
6346 6378 
6619 6628 
6852 6860 
69984 

7202 7213 
7393 7405 
7711 7719 
6306 

4400 

4401 

4641 


349 


3 3368 
8114* 8172s 


5645 


5994 


6200 


6399 


6688 


69034 


7232 


75334 
7728 


3378 
8232* 


5657 


6003 


62254 


6410 


6699 


7266 


79034 


4462 


5668 


6010 


6419 


6708 


7277 


4657 


5685 


6034 


6436 


6719 


7296 


SEQ 0189 


5692 57144 


6048 6054 60674 


6452 64914 


67614 


73214 








I 15 
CZDMIDO DMR=-11 Nate vg ® TESTS MACY11 30A(1052) 29=JUL-81 12:42 PAGE 192 
C2DMID. P11 29-JUL=81 11:32 CROSS REFERENCE TABLE == USER SYMBOLS 


NAKS = 000001 
NESTPC 002376 


1789% 2170 2243 2299 2335 2484 2540* 
2740 2783* 2804* 2832 2868 2902* 2941* 
NEWST 020612 4055 40664 4073 
NEXT 022620 4352 45154 
NOBFR = 15984 6361 6462 
NOXMEM 023630 G 3079 4277 47464 7555 7608 7860 
NXM = 00 590% 6584 6663 6746 
NXMFLG 002352 17708 3076* 3085 3126 3135 3255*  4030* 
<8) 4837* 4851 4859* 7560* 7565 7569* 
OUTFLG 002356 1775@ = 3288* 3311 4522 4636 4734* 
OUTISR 023142 G 4146 46074 
OUTRCV 002332 17584 3285*  3472* 3476* 3488 4714* 4730 
OUTXMT 002334 1759% 3286* 3473* 3477* 3487 4694* 4728 
OSAPTS= 000000 12314 1292 
O$AU = 000000 12314 1324 
O$BGNR= 000000 12314 1318 
O$BGNS= 000001 12314 12504 1284 
O$DU_ = 000001 12314 1250 1326 
OSERRT= 000000 12314 1334 
O$SGNSW= 000001 12314 12504 1288 
O$SPOIN= 000001 12314 1250 1350 
O$SETU= 000000 12314 1278 8437 
PATCH 040042 84274 
T = 001000 G 15214 
PRETIM= 000055 16434 5693 5735 5739 
I = 002000 G 15224 
PRIOO = 000000 G 15104 
PRIO1 = 000040 G 15094 
PRIO2 = 000100 G 15084 
PRIO3 = 000140 G 15074 
= 000 G 15 
= 3 4145 
- 340 G 3094 3411 4021 4276 4807 





6947 7146 7207 7285 7338 
6714 6948 7147 7208 7335 


7424 7516 7739 7825 
3179* 3180* 3215 3223 3224 
2311 4350 


4609 4736 
7175 7250 7314 7516 7825 


4432 5601 5938 6567 

4559 4568* 4579 4588* 

4518 4555 4575 4639 7951* 
51954 

51964 

7460 7469* 7517 7694* 7769 


7554 


7387 
7388 


3291 
6349 


8056* 


7778* 


2641* 
3036* 


4295 
7620 


7580 


7470 
7479 


3293 
6370 


8112* 


7826 


2697 
3282* 


4302* 
7630 


7607 


7490 
7488 
3337 
6379 


8170* 


7841* 


SEQ 0190 
2706 2707* 
3413* 
4325 4748* 
7639 7857* 
7859 
6592 6672 
8230* 


2714* 


4813* 
7868 


6754 














J_15 
CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052) 29-JUL=81 12:42 PAGE 193 SEQ 0191 
CZDMID.P11 29-JUL-81 11:32 CROSS REFERENCE TABLE =~ USER SYMBOLS 


RMODEM= 000017 16264 5893 5950 6143 6192 
ROMADR 002412 1800# 2967 2976 4929% 4957* 4974% 4993* 4999% 5102" 5142 
I = 001000 1559# 2968 2974 2977 2983 

ROMLOC 025531 512 51928 

ROMO = 002 15584 2984 : 

RQI = 000040 1565# 2298 24683 2525 2581 2705 2900 3300 4503 4541 4546 4550 4565 
4570 4585 4590 4646 5893 5950 6143 6192 6334 6440 6636 6644 6712 
6727 6845 6946 6957 7145 7206 7220 7284 7386 #7398 7706 7714 

RRAM = 000014 16244 

RSEL4 035362 7698* 7707# 7779 7848* 

RSEL6 035364 7699* 77084 7788 7849% 

RUN = 100000 1553# 2415 3551 

SAVE 002342 1765# 2702 2720 2744 

SECN = 004000 15814 

SELO = 002232 16844 2187 2298* 2311 2398* 2401* 2415  2495* 2522 2705* 2900*  2966* 2968 
2973*  2974% 29778  2981*  2983*  2984% 3382% 3442 3513 3545 3551 43278 4348 
4350 4439% 4442* 4502* 4503* 4508* 4641* 4646* 4823 5721 5893* 5950"  6143« 

* 

SEL2 002234 16814 1687 2185 2224 2621 2639% 2901" 2923 2940" 2967%  3383*% 3441 3512 
3544 4097* 4098" 4429% 4609 4619 4644* 4692 4733* 4736" 4825 5720 6349« 
6352 6370= 6379* +6453. 6575 6 592% 6654 6672 6737 6754" 6879 6970 7054 
7071s 7107 7124" 7158 7175" 7233 7250% 7297 7314% 7415 7424 7516* 7730 

* 

SEL4 002236 16824 1689  2497* 2722 27948 3450 3521 3687 3714 4101* 4102* 4418* 4451 
4459* 4468 4469 © 4476* 4482* 4486* 4671 4673* %4677* 4682* 4687* 4690* 4695 
4715 4827 5899 5956 7439 7470 7751 7779 

SEL6 002240 16834 1691 2499* 2510  2593* 2595 2630 2725* 2730% 2732* 2796* 2932 29698 
2978* 3449 5 3686 «3713, «4105* «= 4106* 4396 4397* 44008 4401* 4409% 4412* 
4422* 4425* 4432% 4452% 4460% 4465* 4621 4623 4659 4670* 4705 4725 4829 
6361 6462 6584 6663 6746 6888 6979 7063 7116 7167 7242 «7 7448 
7479 7760 7788 ; 

SFLAG 002346 1767# 7695" 7796 7834 7P37* 


2173* 2245* 2301* 2302* 2337* 2384% 2385* 2440* 2480* 2481* 2541* 
2642* 2699% 2700* 2742% 2779% 2780* 2805* 2834* 2835* 2870* 2898 
sie" + dhe $035" 3074* 3075* 3256*  3280*  3281* 3414* 3434 3501 


1274 1276 1280 1282 1284 2 1288 1290 1292 
1300 1302 1304 1306 1308 1311 1314 1316 1318 1320 
1328 1330 1332 1334 1336 1338 1340 1342 1344 1346 
1409 1440 1441 1883 1891 3432 3500 3532 3596 3678 
3762 3998 4018 273 4323 4345 4607 4746 4763 4849 
64 827 8395 84394 8440 
SVCINS= 1267 1268 1269 270 1271 1272 1273 1275 1277 12 

1287 1289 1291 1293 1295 1297 2 1301 1303 1305 
1312 1313 1315 1317 1319 1321 1323 1325 1327 1329 
1337 1339 1341 1343 1345 1347 1349 1370 1372 1373 
1377 1378 1379 1380 1381 1382 1383 1384 1385 1 


ss - 


K 15 
CZDMIDO DMR-11 Nate og TESTS MACY11 30A(1052) 29-JUL=81 12:42 PAGE 194 
C2DMID. P11 1:32 


29-JUL=81 


CROSS REFERENCE TABLE == USER SYMBOLS 





SEQ 0192 
2195 21 
2220 2221 
2314 2318 
2418 2422 
2491 2507 
2627 2633 
2922 2926 
3082 3083 
3317 3318 
3357 3373 
41 3442 
3455 3457 
79 3480 
3493 34 
3517 3518 
3539 3540 
3559 3560 
3585 3586 
3615 3616 
3635 3636 
3662 »§ 3663 
3686 
99 3702 
3719 3721 
3740 3741 
3767 3768 
4045 4047 
4079 4086 
4119 4120 
4150 4220 
4293 he 
4614 4615 
666 4667 
4721 4740 
4809 4810 
4858 4862 
4934 4935 
968 5048 
5072 5073 
099 5120 
5134 5147 
5266 5267 
5348 5349 
5393 5409 
5433 54 
5455 5456 
5476 54 
5590 5591 
5637 5644 
5707 57 
730 5731 
5750 5751 
5771 5772 
5788 5792 


L 15 
CZDMIDO DMR-11 wth pg TESTS MACY11 30A(1052) 29=JUL=81 12:42 AGE 195 SEQ 0193 
CZDMID.P11 29-JUL=81 11:32 CROSS REFERENCE TABLE -= USER SYMBOLS 


5975 5982 5983 993 5994 6002 6003 6009 6010 6014 6015 6016 
6021 6025 6033 6034 6047 6048 6053 6054 6062 6110 6117 
6128 6129 6140 6141 6150 6151 6157 6158 6159 6 6167 6168 
6179 6 6191 6199 6200 62 6207 6208 62 6222 6226 6234 
6 6237 6238 6239 6240 6241 6244 6283 6 6291 1 6302 
6311 6327 6328 6345 6346 6355 6356 6357 6358 6365 6366 
6377 6378 6387 6391 6398 6399 6409 6410 8 6419 6435 

6452 6456 6457 6458 59 6465 6466 67 648 6482 6483 


6590 6 66 07 6608 18 19 27 6628 57 8 9 
66 6 6668 6669 76 80 6687 6688 98 99 6707 6708 
6719 6740 6741 6742 6743 6749 6750 6751 6752 6758 w) 6786 
10 6811 6821 6822 6830 6831 6851 6852 6859 

6870 6882 6883 6884 6885 6891 6892 6893 68 6921 6922 
6933 6941 6942 6968 6969 6973 6974 6975 6976 6983 69 6985 
69 7020 7052 7053 7057 7058 7059 7060 70 7 7069 
7079 7105 7110 7111 7112 7113 7119 7120 7121 7122 7128 
7156 7157 7161 7162 7163 7164 7170 7171 7172 7173 7 7183 
7191 7201 7202 7212 7213 7231 7232 7 7237 2 7239 7245 
7247 7248 7254 7258 7265 7266 7276 7277 7295 7296 73 7 

7303 7309 7310 7311 7312 7318 7322 7352 7353 73 7367 7371 


6 7691 7710 7711 7718 7719 7727 7728 7733 7734 7735 7736 
7745 7746 7747 7754 7755 7756 7757 7763 7 7765 7766 7772 
7774 7775 7782 7783 7784 7785 7791 7792 7793 7 7818 7819 
7821 7859 7860 7861 7862 7863 7864 7875 7876 7882 7883 
7887 7888 7889 78 7891 7892 7904 7963 7 7977 7978 
8 £068 8069 8083 8124 8125 8140 8182 8183 8202 8242 8243 
8272 8276 8277 8278 8279 8281 8282 8283 8 82 8287 8288 
8290 8293 8394 8398 8399 8400 8401 8402 8405 8436 8437 8438 

SVCSUB= 000001 12314 124604 4922 4967 5098 5298 5358 5546 5636 5862 5931 5974 
6109 6178 6282 6390 6530 6599 6679 7019 7078 7131 7182 7257 

SVCTAG= 000001 12314 12424 1424 1446 3495 3528 3591 3672 3701 3729 3744 3758 
4233 4305 4331 4600 4739 4751 4776 4844 4871 4962 094 5146 
5271 5354 5415 5419 5481 5632 5711 5714 5791 5927 5970 20 
6067 6174 6221 6225 6243 6386 6488 6491 6508 6595 6675 6757 
6 6 : Oe a he 7178 7253 7317 7321 7533 7 8001 8082 

SVCTST= 000001 12314 12394 4804 4920 5229 2 5544 5860 6106 6280 6528 6779 
7017 7334 7550 7946 8052 8109 8166 8227 

SswOO = 000001 15484 

SwO1 = 000002 15474 

swO2 = 000004 15464 

SwO3 = 000010 15454 

Sw04 = 000020 15444 

SwOS = 000040 5434 

SWO6 = 000100 15424 

swO7 = 000200 15414 

SWwO8 = 000400 15404 

swO9 = 001000 15394 








M15 
CZDMIDO DMR-11 Nate TESTS MACY11 30A(1052) 29=-JUL=81 12:42 PAGE 196 SEQ 0194 


CZDMID.P11 29-JUL-81 11:32 CROSS REFERENCE TABLE == USER SYMBOLS 
Swi0 = 002000 15384 
SW11 = 004000 15374 
Swi2 = 010000 15364 
Swi3 = 020000 15354 
SW14 = 040000 15344 
Sw15 = 100000 15334 
S$LSYM= 010000 12314 14254 14474 34964 3529% 35924 36734 37024 37304 37454 3759 37754 42344 
43064 43324 46014 47404 47524 4777# 48454 48724 49634 5095# 51474 51514 52728 
53554 5416 5420 54824 56334 57124 5715H# 5792H 59284 59714 60214 60624 60684 
61754 62224 62264 62444 63874 64894 64924 65094 65964 66764 67584 67624 6904# 
6 70754 71284 7179% 72544 73184 7322 75344 79044 80024 80834 8140# 82024 
82584 82954 84074 
$1 037712 83 4084 
T 16414 5342 5403 5458 5462 
TBUF 002522 18354 6335 6441 6645 6846 6958 7221 7399 7439 7489 
T= 00004 18344 3 6442 6646 6847 6959 7400 7448 
TEMP 002340 17644 2175* 2214 2234 
TEMP1 002336 17634 8053* 8080 
TFLAG 002520 18334 7344* 7429 7438* 7521 7693* 7741 7750* 7830 7840* 
THRESH= 000013 16194 5678 6321 6429 6804 
THIL = 16444 5697 5746 5750 
TH2L = 2 16454 5699 5757 5761 
THSL = 16464 5695 5768 5772 
TH4L = 16474 5701 5779 5783 
TIMER = 000012 16184 5661 6815 
TOLONG= 000020 15954 6979 
TOUT = 000002 16004 6888 
TSELS4 035400 7701* 7715# 7751 7851* 
TSEL6 035402 7702* = 771 7760 7852* 
TSARGC= 12 12674 12684 12694 12704 12714 22194 22374 2241 26144 2618 34344 
3439 34414 34494 455 34574 3462 34644 346 34794 85 3487# 3493 
35044 3 35124 3518 35204 3526 35364 35444 3550 35564 3560 35664 
3570 3574# 3578 35844 36004 3605 36134 362 36294 37 53 
# 3669 36864 3692 36944 37074 37134 3719 37214 
3727 37364 3742 37504 37664 3772 40864 409 41144 4120 42 
47684 4773 48624 4868 49314 4936 49434 4951 50544 50784 508 51264 
52414 5245 5427H# = 54 54384 5444 54504 54614 5467 54724 78 
57204 57284 57384 5744 57498 57604 7 57714 57824 
5788 62344 6241 64984 65 76474 7652 78874 7892 
TSCODE= 000032 82764 82814 82864 83984 
TSERRN= 000023 12314 22084 22284 2330 24344 2625 26344 28644 2927 2936 3329 33554 33744 
4375# 461454 4 46524 46654 47004 4700H 47194 48564 5049% 5073# 51214 52664 
3 53914 54104 55914 56274 7 590 59224 60154 61584 62074 
63564 63654 64574 64664 64824 65794 65884 665 66674 67414 67504 
68924 69744 69 70584 70674 71114 71204 71624 71714 72374 724664 73014 73104 
7419# 74334 7443 74524 74644 - 74744 74834 75014 75084 7 77344 86077454 5 
77644 77734 = 77834 7792 78194 78834 
TSEXCP= 000000 82764 8280 82814 8285 82864 8291 83984 8403 
TSFLAG= 000040 52364 5255# 53064 53184 53664 5379 55544 55664 5577# 55844 56134 5620  5644# 
56564 56674 56844 56914 58704 58814 58904 59484 59824 59934 60024 60094 
60474 61174 61284 6140 61504 61674 6 61994 63014 63104 
63274 63454 63778 64094 64184 64354 514 65384 549% 65564 7# 
66274 66874 9 67074 67184 67864 68104 68214 68304 68514 69214 6932 
69414 70524 71054 71564 7190 72014 72124 72314 72654 72764 7295# 73528 
73714 7392 74044 76614 76814 76 7710# 77184 77278 


N 15 
CZDMIDO DMR-11 or te TESTS MACY11 30A(1052) 29=-JUL=81 12:42 PAGE 197 SEQ 0195 


CZDMID. P11 29-JUL=81 11:32 CROSS REFERENCE TABLE == USER SYMBOLS 
TSGMAN= 000000 12314 
TSHILI= 000005 82764 8279 82814 8284 82864 8290 83984 8402 
TSLAST= 000001 12314 84374 
TSLOLI= 000001 82764 8278 82814 8283 82864 8289 83984 8401 
TSLSYM= 010000 12314 1425 1447 3496 3529 3592 3673 3702 3730 3745 3759 3775 4234 
4306 4332 4601 4740 4752 4777 4845 4872 4963 5 5147 5151 5272 
5355 5416 5420 5482 5633 5712 5715 5792 5928 5971 2 
6175 6222 6226 6244 6387 6489 6492 6509 6 6 6758 67 6904 
7075 7128 7179 7254 7318 7322 7 8002 8083 8140 8202 
8258 8295 8407 
TSLTNO= 000023 84404 
TSNEST= 177777 12314 12344 14074 14244 14398 14464 34324 34954 3500 35284 35324 35914 35964 
36724 36784 37014 37054 3729% 37344 37444 37484 37584 37624 37744 39984 40054 
40184 42334 42734 43054 43234 43314 43454 46 46074 47464 47514 47634 
47764 48054 48444 48494 48714 49214 SH 49628 4 we 51464 51504 
52714 52974 2 53544 53594 5415# 54194 54814 55454 55474  5632# 
56374 57114 57144 57184 57914 58614 58634 5927# 59324 59704 60254 
60614 60674 61074 6110 61744 61794 62214 62254 62324 62434 62814 8 
63914 8 64914 64 65294 65314 65954 66754 6°57# 67614 
6 69154 70184 204 70744 7079% 71274 71324 71784 71834 72534 
72584 73174 73214 73354 75334 75514 79034 79474 80014 5 80824 81104 81394 
81674 82014 82284 8257 8272# 8293 83944 84054 84344 
T$NSO = 000000 12344 8434 
T$NS1 = 000005 14074 1424 14394 1446 34324 3495 35004 3528 35324 3591 35964 3672 
3701 37054 3729 37344 3744 37484 3758 37624 3774 39984 4005 40184 4233 
42738 43234 43454 4600 46074 4739 47464 = 4751 47634 4776 48054 
4844 48494 4871 49214 5150 52304 5271 5297# 5419 54234 5481 55454 5714 
57184 5791 58614 6067 61074 6225 62324 2 62814 9 6 65294 
6761 67804 6903 69154 6998 70184 732 73354 7533 75514 79474 8001 
80534 8082 81104 81674 8201 82284 82724 83944 05 
TENS2 = 000002 49234 4962 49684 5094 50994 5146 5299% 5354 53594 5415 5547# 5632 56374 


7127 71324 178 71834 72 72584 7317 

TSPTNU= 000000 12314 

TSSAVL= 177777 12314 

TSSEGL= 177777 12314 

T$SUBN= 000000 12314 48044 4920 4922 4967# S098# 5229% 52964 52984 53584 55444 5546#  5636# 
58604 58624 59314 59744 60244 61064 61094 61784 62804 62824 63904 65284 65304 
6599# 6679% 6779% 69144 70174 7019 70784 71314 71824 7257# 7334 7550 79464 
80524 81094 82274 

TSTAGL= 177777 12314 : ; 

TSTAGN= 010104 12314 14074 1439 34324 35004 35324 35964 36784 3705# 37344 37484 37624 39984 
40184 4273H# 43234 43454 46074 47464 47634 48054 48494 49214 49234 4 50994 


TSTEMP= 000000 13724 861373 13744 13754 1376 13774 13784 13794 13804 13814 13824 13834 13844 
13854 13864 13874 13884 13894 13904 13914 14244 1446 34954 35284 35914 3672 
37014 3729 37444 37584 37744 40054 42334 43054 43314 46 4739# 47518 47768 
48444 48714 49624 50944 1464 1504 5236 5237 52554 5256 52714 7 
53184 5319 53544 5367 53794 5380 54154 5419 54814 5554# 5555 


5 5 
5882 58904 5891 59164 17 59274 59484 5949 5970@ 5982e@ 5983 59934 5994 





B 16 
CZDMIDO DMR=11_ FUNCTIONAL TESTS MACY11 30A(1052) 29=JUL-81 12:42 P PACE 198 SEQ 0196 
CZDMID.P11 29-JUL=81 11:32 CROSS REFERENCE TABLE == USER SYMBOLS 


60024 6003 60094 6010 60204 60334 6034 60474 6048 60534 6054 60614 60674 
61174 6118 61284 6129 one ae eau" 6151 61674 6168 61744 61904 6191 


61994 6200 62214 62254 434 62 91 63014 6302 63104 6311 63274 6328 
63454 6346 63774 63864 63984 6399 64094 6410 6419 354 
64514 6452 64884 64914 65084 5384 6539 65494 6550 65564 65954 66074 
6608 1 19 66274 6628 66754 66874 688 66984 6 67074 6708 67184 
6719 6757# 67614 67864 6787 68104 6811 68214 6822 68304 6 68514 2 
68594 6860 6 69214 6922 69324 6933 69414 6942 6969 6 70524 
7053 70744 = 71054 71274 = 71564 =7157 71784 71904 7191 72014 7202 72124 
7213 72314 7232 72654 7266 72764 = 7277 72954 7296 7317# 73214 73524 
7353 73664 7367 73714 7372 73804 7381 73924 7393 74044 7405 7 76614 
7662 76764 7677 76814 7682 76904 7691 77104 7711 77184 7719 7727# = =7728 
79034 79634 7964 79774 79844 79 80014 80684 8069 80824 81244 8125 
HS 94 81824 8183 82014 8242 8243 8257# 827 82814 82864 83984 84054 

TSTEST= 000023 12314 48044 49204 4922 4967 5098 5229# 52964 5298 5358 55444 5546 5636 
58604 5862 5931 5974 4 61064 6109 6178 62804 6282 390 65284 6530 
6 6679 6779% 69144 70174 7019 7078 7131 7182 7257 73344 75504 79464 
8052 8109% 81664  8227# 8440 

TSTSTM= 177777 12314 2190 22:\7 2222 2227 2240 2314 2329 2418 2433 2617 2624 2633 


5379 3 5409 5416 5420 5432 5443 5455 5466 5477 5482 5547 5554 
5577 5584 5 5613 5620 5626 5633 5637 5644 5656 7 6 

5691 5705 5712 5715 5725 5733 5743 5754 5765 5776 5787 5792 3 

5870 5881 8 2 5916 5921 5928 5932 5948 5959 5971 5975 5982 


6244 6283 62 6301 6310 6327 6345 6355 6364 6377 6387 6391 6398 
6409 6418 6435 6451 6456 6465 6481 6489 6492 6505 6509 6531 6538 
6549 6556 6578 6587 6596 6600 6607 6618 6627 6657 6 

6687 6698 6707 6718 6740 6749 6758 6762 6786 6810 6821 6830 

6859 6867 6882 6891 6904 6921 6932 6941 6968 6973 6983 7020 
7052 7057 7066 7075 7079 7105 7110 7119 7128 7132 7156 7161 7170 
7179 7183 7 7201 7212 7231 7236 7245 7254 7258 7265 7276 7295 


8083 8124 8140 8182 8202 8242 8258 

T$TSTS= 000001 12314 48054 49214 52304 5297 55454 58614 61074 62814 65294 67804 69154 70184 
73354 75514 7947 80534 81104 81674 82284 

TS$AUT= 010015 42734 4305 

TS$CLE= 010016 43234 4331 

T$$0U = 010022 47634 4776 

TS$HAR= 010102 8272 8294 

T$$HW = 010000 14074 1424 

TS$INI= 010014 40184 4233 


TS$MSG= 010056 34324 3495 35004 3528 35324 3591 35964 3672 36784 3701 37054 3729 37344 





C 16 
CZDMIDO DMR=11_ FUNCTIONAL TESTS MACY11 30A(1052) 29=JUL-81 12:42 PAGE 199 SEQ 0197 
CZDMID.P11 29-JUL-81 11:32 CROSS REFERENCE TABLE == USER SYMBOLS 


3744 37484 3758 37624 863774 54234 5481 57184 5791 62324 6243 64964 6508 


T$$SOF= 010103 83944 8406 

TS$SRV= 010024 4345# 4600 46074 4739 47464 4751 48494 4871 

T$$SUB= 010072 49234 4962 49684 4 5099% 5146 5299% 5354 5359% 5415 5547# 5632 56374 
5711 5863 5927 5932" 597 59754 6020 60254 6061 6110 6174 6179" 6221 
62834 63914 6488 65314 6595 6600 6804 6757 7020 7074 70798 
712? 7132H «= 7178 = 71834 = 7253S 7258H = 7317 

T$$Sw = 010001 1439 1446 

TS$TES= 010101 48054 4844 4921# 5150 52304 5236 5255 5271 5297# 5306 5318 5366 5379 
5419 5545# 5554 5566 5577 5584 5613 5620 5644 5656 5667 5684 5691 
5714 58614 587 5881 5890 5916 5948 5982 5993 6002 60 6033 6047 
6053 6067 6107 6117 6128 6140 6150 6767 6190 6199 6225 6281# 62 
6301 6310 6345 6377 6398 6409 6418 6435 6451 6491 6529% 6538 
6549 6556 6607 6618 6627 6687 6698 6707 6718 6761 6780 6786 6810 

6830 6851 6859 6903 69154 6921 6932 6941 6968 70184 7052 


0 7 
7903 hott 7963 7977 7984 8001 80534 8068 8082 81104 8124 8139 81674 


8182 8201 82284 8242 8257 

11 023720 G 1372 48044 
T10 032554 G 1381 67794 
111 033000 G 1382 69144 
112 033160 G 1383 = 7017# 
T12.1 033160 7019# 

T12.2 033310 70784 

T12.3 033426 71314 

112.4 033544 71828 

112.5 033722 72578 

113 034064 G 1384 73344 
114 034614 G 1385 75504 
115 036360 G 1386 794 
116 036462 G - 1387 80524 
117 —s-036550 G 1388 81094 
118 036620 G 1389 81664 
119 036670 G 13 82278 
T2 024230 G 1373 49204 
12.1 24230 49224 

72.2 024406 49678 

T2.3 025030 50984 

T 025544 G 1374 52294 
14 025676 G 1375 52964 
14.1 025676 52984 

14.2 026024 53584 

15 026724 G 1376 5544 
T.1 026724 55464 

15.2 06 56364 

16 030136 G 1377 58604 
16.1 030136 58624 

16.2 030272 59314 

16.3 362 59744 

16.4 030456 60244 

17 030716 G 1378 61064 
17.1 030716 61094 

17.2 031062 61784 

18 031340 G 1379 6 280# 





Nene eee ee SS 


CZDMIDO DMR=11_ FUNCTIONAL TESTS MACY11 30A(1052) 


CZDMID.P11 29-JUL=81 11 








011522 
012062 


012404 
012562 


014140 
013064 
00001 
000001 
011070 
012744 
010276 


040100 


314 
314 


65284 


29-JUL-81 


7947 
4546 


D 16 
12:42 PAGE 290 
CROSS REFERENCE TABLE == USER SYMBOLS 


3294 


SEQ 0198 


3338 





E 16 
CZDMIDO_ DMR-11 FUNCTIONAL TESTS MACY11 30A(1052) 29=JUL=81 12:42 AGE a SEQ 0199 
CZDMID.P11 29-JUL=81 11:32 CROSS REFERENCE TABLE =~ MACRO NAM 


864 
BACCIT 21124 6331 6437 6641 6724 6842 6954 7217 7395 
BASEIN 19914 5309 5370 5557 5596 5647 5872 5933 5984 6119 6292 6400 6540 6562 6609 


6689 6788 6923 7027 7038 7192 7267 7968 

BCOMPL 14 12314 44 4049 4054 

BERROR 1# 12314 2506 2531 2908 2914 2921 7413 

BGNAU 1# 12314 

BGNAUT 1# 12314 4272 

BGNCLN 1# 12314 4322 

BGNDU 1# 12314 4762 

BGNHRD 1# 12314 8271 

BGNHW 1# 12314 1406 

BGNINI 1# 12318 4017 

BGNMOD 1 12314 1233 

BGNMSG 1# 12318 3431 3499 3531 3595 3677 3704 3733 3747 3761 5422 5717 6231 6495 

B 14# 12314 3997 

BGNPTA 1# 12314 

BGNRPT 14 12314 

BGNSEG 14 12314 

BGNSET 1# 12314 

BGNSF T 1# 12314 8393 

BGNSRV 1# 12314 4344 4606 4745 4848 

BGNSUB 1 12314 4921 4966 5097 5297 5357 5545 5635 5861 5930 5973 6023 6108 6177 
6281 6389 6529 6598 6678 7018 7077 7130 7181 7256 

BGNSW 1 12314 1438 

BGNTST 14 12314 4803 4919 5228 5295 5543 5859 6105 6279 6527 6778 6913 7016 7333 
7549 7945 8051 8108 8165 8226 

BNCOMP 14@ 12314 4059 4078 

BNERRO 14 12314 2490 2588 2611 2715 2789 

BREAK 14 12314 2189 2313 2417 3304 

BRESET 12314 4765 


14 
CALL 19324 3030 4509 4938 4990 4994 5104 6042 6049 7361 7369 7530 7671 7679 7705 
7713 7898 7955 7991 8060 8071 8116 8127 8135 8174 8185 8193 8234 8245 8253 


CLEAR 19764 5230 5249 5300 5360 5548 5638 5864 5976 6027 6111 6284 6392 6532 6601 
6681 6780 6915 7022 7081 7134 7184 7259 7346 7655 7957 8062 8118 8176 8236 


CLRVEC 14# 12314 3160 4037 4292 4839 7562 7636 7874 
CNTRIN ad 5883 5941 5995 6055 6303 6411 6620 6700 6823 6934 7093 7374 7684 


DELAY 1# 12314 2194 2317 2421 3314 
DESCRI 14 12314 1890 

DEVTYP 14 12314 1882 

DISPAT 14 12314 1369 

DISPLA 12314 

DMR IN 20394 3391 5568 5604 5658 5675 6181 6318 6426 6801 6812 6834 
DOCLN 12314 4300 4835 

DODU 1# 12314 4297 4832 

DORPT 14 12314 

ENDAL/ 1# 12314 

FNDAUT 14 12314 4304 

ENDCLN 1# 12314 4330 

ENDCOM 1# 12314 

ENDDU 1 12318 4775 

ENDHRD 1# 12314 8292 


———-—-- 


F 16 
CZDMIDO DMR=-11 eA og TESTS MACY11 30A(1052) 29=-JUL-81 12:42 “PAGE 203 SEQ 0200 
CZDMID.P11 29=JUL-81 11:32 CROSS REFERENCE TABLE == MACRO NAMES 
HW 1% 12318 1623 

ENDINI 14 12318 4232 

ENDMOD 1# 12314 8433 3 

ENDMSG 14 12318 3494 3527 3590 3671 3700 3728 3743 3757 3773 5480 5790 6242 6507 

ENDPRO 14 12318 4004 

ENDPTA 14 12314 

ENDRPT 1# 12314 

ENCDSEG 14 12314 

ENDSET 14 12314 

ENDSFT 14 12314 8604 

ENDSRV 14 12314 4599 4738 4750 4870 

ENDSUB 4 12314 4961 5093 5145 5353 5414 5631 5710 5926 5969 6019 6060 6173 6220 
6385 6487 65°4 6674 6756 7073 7126 7177 7252 7316 

ENDSW 1 12314 1445 

ENDTST 14 12318 4843 5149 5270 5418 5713 6066 6224 6490 6760 6902 6997 7320 7532 
7902 8000 8081 8138 8200 8256 

EQUALS 14 12314 1459 

ERRDF 14@ 12314 2206 2226 2328 2432 2623 2632 2925 2934 3327 3353 3372 4373 4612 
4627 4650 4663 4698 4707 4717 4854 5047 5071 5119 5264 5328 5347 5389 5408 
5589 5625 5704 5901 5920 5958 6013 6156 6205 6354 6363 6455 6 6480 6577 
6 6 6665 6739 6748 6866 6881 6890 6972 6982 7056 7065 7109 7118 7160 
7169 7235 7244 7299 7308 7417 7431 7441 7450 7462 7472 7481 7 7641 
7732 7743 7753 7762 7771 7781 7790 7817 7881 

ERRHRD 14 12314 

ERROR 14 12314 

ERRSF 14 12314 

ERRSOF 14 12314 2862 

ERRTBL 14 12314 

ESCAPE 14 12314 5235 5254 5305 5317 5365 5378 5553 5565 5576 5583 5612 5619 5643 


7230 7275 7294 7351 7365 7370 7379 7391 7403 7660 7675 7680 7689 7709 
7717 7726 7962 7976 7983 8067 8123 8181 8241 

EXIT 14 12314 
FEQUAL 14 12314 
GETBYT 14 12314 
GETPRI 14 12314 
GE TWOR 14 12314 
GMANIA 14 12314 
GMANID 14 12314 
GMANIL 14 12314 
GPHARD 1@ 12314 4074 
GPRMA 14 12318 8275 8280 
GPRMD 14 12314 8285 8397 

14 12314 
HEADER 14@ 12314 1264 

1# 12314 
IOSETU 14 12314 
IOSTAR 14 12314 
KT11 14 12314 
LASTAD 14@ 12314 8435 
MANUAL 14 12314 
MEMORY 14 12314 3163 
MSBY TE 14 12318 12654 1271 1272 1273 










G 16 
CZDMIDO DMR-11 Aah ve TESTS MACY11 30A(1052) 29=JUL=81 12:42 PAGE cite SEQ 0201 
CZDMID.P11 29-JUL=81 11:32 CROSS REFERENCE TABLE == MACRO NAM : 


69734 69834 70574 71104 
ordi 74634 74734 74824 75 
5319 53664 5367 53794 5380 
56204 5621 56444 56564 
5882 58904 5891 59164 5917 
60334 60474 6048 

61904 6191 61994 6200 
63774 63984 6399 64094 
6550 65564 6557 66074. 6608 
67184 6719 67864 6787 68104 

69324 6933 69414 6 
72014 72124 8 721 72314 

73714 72 73804 


CZDMIDO DMR=11 Neth ® TESTS MACY11 30A(1052) 
CZDMID.P11 1:32 


M$GENB 
MS$GETS 


MSGETT 


M$GNGB 


M$GNIN 


29-JUL-81 
3729 37344 
46004 46074 
50944 0984 
55464 56324 
60614 0674 
64914 64964 
70174 70194 
79034 94 
84394 
14 12314 
1 12314 
43054 43314 
5419# 54814 
63 4884 
732184 75334 
1# 12314 
56564 56674 
60534 61174 
64094 64184 
68104 68214 
72318 72654 
77184 7727# 
1# 12314 
12 12984 
13284 13304 
1409 14394 
39984 40184 
83944 8395 
1# 12314 
12784 1279 
1293 12944 
13084 1309 
1323 13244 
13384 1339 
13744 8613754 
13894 13 
2199 2200 
2229 2230# 
2325 23298 
24344 24354 
26264 2627# 
2926# 2927# 
30954 31614 
3322 3284 
34344 34354 
34514 34524 
34684 3469 
3493 34 
35204 35214 
35454 35464 
570 35744 
3603 36044 
3632 36334 
36614 662 
3 36874 
37084 709 


36 
37104 


CROSS REFERENCE TABLE == MACRO NAM 


3 
37134 


29-JUL-81 
37624 37744 
47634 47764 
52714 52964 
57184 57914 
61784 62214 
65954 65994 
71314 71784 
81094 81394 
35284 35914 
4776# 48444 
57914 59274 
66754 67574 
81394 82014 
3184 53664 
58814 58904 
61674 61904 
65494 65564 
69214 69324 
736 73714 
80684 81244 
12764 12784 
13064 13084 
13384 13404 
18914 34324 
46074 47464 
1268 269 
1283 12844 
12984 1299 
13134 13144 
32 329 
1343 13444 
13794 13804 
1884 1885 
22084 22094 
22404 2241 
4184 24224 
25324 25894 
26364 27164 
29364 2937# 
32964 32974 
33544 33554 
3439 34414 
3457# 34584 
34824 3483 
3507 35084 
35254 3526 
3550 35564 
3578 35844 
36154 3616 
3637 56454 
36664 3667 
36914 3692 
37144 37154 





H 16 
12:42 "PAGE rf 


36984 
37214 


SEQ 0202 
43234 43314 
4922# 49624 
54234 54814 
59744 866 
638 


71784 72534 
56134 56204 
60094 60334 
63454 63774 
67074 67184 
71 72014 
76814 76904 
12904 12924 


37344 7484 
64964 82724 
1275 12764 
2 1291 
305 13 
13204 1321 
1335 3 
13704 13728 
13864 13874 
2196 2197 
2223 22278 
2322 2323 
2428 24 
2618 26244 
2909# 29154 
30824 3083 
3319 3320 
33764 34114 
3447 34494 
34654 34 
490# 3491 
3516 35174 
35404 3541 
35674 3568 
6004 36014 
36294 3630 
651 36524 
3682 

699 37024 
3722 8 37234 


CZDMIDO DMR-11 ele og ® TESTS MACY11 30A(1052) 


CZDMID.P11 29-JUL-81 
3725 37264 
37538 754 
40 40394 
40764 40778 
4119% 4120 
42214 4222 
4301# 43 
46308 46314 
47098 7104 
4771 4772H 
48454 48554 
49314 49324 

9634 
50734 50744 
51224 51234 
52414 52428 
53184 53194 
5 53 
5431 54324 
54554 5456 
5478 54824 
56134 56144 
6844 
5724 57254 
5743# 5744 
5766 57714 
5792 58634 
59224 59234 
59934 59944 
60484 60534 
61584 61594 
62224 62264 
63024 63104 
63774 63784 
6457# 64584 
65004 6501 
65784 65794 
66284 6657# 
67074 67084 
67874 68104 
68824 
69684 969# 
70584 70594 
71194 1204 
71734 7179#% 
72454 72464 
73034 73094 
73924 73934 
74444 = =74454 
74834 74844 
7557# 75584 
76424 76434 
76824 76904 
77464 = 7747# 
77834 77844 
78634 7864 


37304 
3 


29-JUL=81 


CROSS REFERENCE TABLE <= MACR 


37374 
37664 


I 16 
12:42 "PAGE 206 
O NAMES 


37414 
37 


37454 
37 


ar 


SEQ 0203 


40754 
41174 4118 
4150 42204 
42984 4 
46284 46 
47024 47084 
47694# 47704 
48404 48414 
4872 49234 
49504 4951 
061 50724 
51204 51214 
52364 52374 
53064 53074 
53674 53 
54298 54 
54534 5454 
5476 54774 
55924 55934 
5657#  5667# 
5722# 57234 
57414 5742 
764 57654 
5787# 5788 
5917# 59214 
59824 59834 
60 7# 
61514 61574 
62 62 
62914 63014 
63674 
64524 645 
64984 6499 
65564 65574 
66194 66274 
66984 66 
67624 67864 
9# 68704 
69414 69424 
70534 70578 
71124 86671134 
71714 71720 


DMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052) 





CZDMID. P11 29-JUL-81 11:52 
79638 7977# 
82024 82424 82438 
8288 289 8290 
MSGNLS 1# 12314 
MSGNSU 1# 12314 49224 
62824 3 65304 
MSGNTA 1# 12314 142464 
43314 47394 
54814 56324 57114 
64914 65084 
75334 79034 80014 
MSGNTE 1# 12314 48044 
7550# 9464 80524 
MSHAPT 1# 12314 12654 
MSHNAP 1# 12314 12654 
MSINCR 14 12314 12344 


29-JUL-81 


CROSS REFERENCE TABLE <= MACR 


80024 
7 


80684 
8278 
8400 


J 16 
12:42 “AGE 207 
O NAMES 


80694 
9 





SEQ 0204 
81824 81834 
82 8287 
84384 
61094 61784 
42334 43054 
54154 5419 
62434 6 
7317# 73214 
7017# 73344 
24334 26178 
33734 34124 
3529% 35324 
734 8636784 
37554 37598 
4119# 41424 
46074 46134 
48114 48344 
4967# 4 
52 52444 
5359# 865 
55454 55464 
56564  5667# 
5792H 865 
5959# 59714 
60624 
904 61994 
63274 63454 
64814 64894 
65 65 
67404 67494 
69044 69144 
70574 «867 
71824 71834 
73094 73184 
74634 74734 
76614 76764 
78634 78764 
8109% 81104 
42934 42984 
40054 


K 16 
CZDMIDO DMR=11_ FUNCTIONAL TESTS MACY11 30A(1052) 29-JUL=81 12:42 * PAGE 208 SEQ 0205 
CZDMID.P11 29-JUL=81 11:32 CROSS REFERENCE TABLE -= MACRO NAMES 


73214 75334 79034 80014 80824 81394 82014 82574 82934 84054 84344 
MSPRIN 1# 12314 2219 2237 26144 34348 34414 3449H 34574 34644 3479 34874 35044 35128 
3 35664 36004 36 3629 36804 36864 3694 


S364 35444 35564 35744 35844 0 134 4 36454 36614 8 4 
37134 37218 37 37504 6# 40 41144 4220 47684 48624 49314 50544 50784 
ace pat the 54384 5450 54614 54724 57204 57284 . 57384 57494 57 57714  5782# 
MSPUSH 1# 12314 12344 14074 1439% 34324 35004 35324 35964 36784 37054 37344 37484 37624 
40184 42734 43238 4345H 46074 47464 47634 48044 4805 48494 49208 4921 49224 4923 
50984 50 52298 2964 5297 52984 5299 54234 55444 5545 
5547 6 5637 1 58604 61 58624 3 59314 5932 59744 5975 60244 2 
6107 6109# 6110 61784 6179 62324 62804 6281 62824 6283 6391 65284 
65308 531 6 66794 80 6779# 6 69144 6915 7017# 7018 70194 7020 
7079 71314 7132 71824 7183 72574 = 725 73344 35 75504 79464 80524 
81094 8110 81664 1 82274 228 82724 83944 
MSPUT 1# 12314 2219% 2237 26144 30784 34344 34414 3449 34574 34644 3479 34874 35044 
35364 35444 35564 35664 35744 35844 36004 36134 36294 S# 36614 36864 
3707# 837134 37214 37364 37504 7 0864 41144 413 41454 42204 42764 47684 48074 
49318 4 50544 50784 51264 52414 54274 54384 5450H 54614 54724 57208 57284 7 
57 57714 57824 62344 64984 76074 76474 78594 78874 
MSPUT1 14 12314 2219% 2220 2237H# 2238 26144 2615 30784 3079 3080 3081 34344 3435 
34414 3442 3443 3444 34494 3450 3451 3452 34574 3458 3459 34644 3465 3466 
8 3482 34874 3488 3489 3490 35044 3505 5 35124 3513 3514 3515 
3521 3522 3523 3537 3538 35444 3545 3546 3547 3557 5664 3567 
3575 35844 3585 36004 3601 02 36134 3615 3617 3618 36294 3 3633 
3650 36614 63 3665 3666 36804 3681 6 88 89 36944 
3707# 3708 37134 3714 3715 3716 37214 3722 3723 3724 37364 3737 3738 
37504 3751 3752 3753 37664 3767 3768 3769 40864 4087 40 4089 41144 4115 
4117 41384 4139 4140 4141 41454 4146 4147 4148 42204 4221 42764 4277 4278 
47684 4769 4770 48074 4808 48 4810 48624 4863 48 4865 49314 4932 4933 
4944 4 4946 4947 4948 50544 5055 5056 5057 5058 50784 0 0 
51264 7 5128 5130 52414 5242 54274 85429 5430 54384 5440 5441 54504 
5453 54614 463 4 54724 5474 5475 5720# 5721 5722 5723 57284 7 5731 
5740 5741 5749% 5751 5752 57604 5762 763 57714 5773 5774 57824 5784 5785 
6236 6237 6238 64984 65 6502 6503 75544 7555 7556 7557 76074 
76474 7648 7649 78594 7860 7861 7862 78874 7888 7889 
MSRAD I << a4 82764 82814 82 83984 
MSRNRO 14 12314 31644 3165 40754 4077 
MSSETS 12314 12344 14074 1439% 34324 35004 35324 35964 7 37054 37344 37484 37624 
40184 43234 43454 46074 47464 47634 48054 48494 49214 49234 2 
2 5359# 54234 55454 55474 5637# 57184 58614 58634 59324 5975# 60254 61074 61104 
62324 62814 62834 63914 65294 65314 8 7 69154 7018 7020# 70 
coven ha 7 ft od 73354 75514 7947 34 8110 81674 82284 8272H 83944 
MSSVC 1# 12314 21904 2207 2219% 2222 2227 22374 2240 23144 23 24184 2433 26144 
624 2633 2863 2926 784 3082 me 3095 31614 3162 31644  3296# 
3328 3354 34114 3412 34344 3438 34414 34494 3454 3457# 3461 
34874 92 34954 3496 35044 3508 35124 3517 35204 3525 35284 3529 
3540 35444 35564 3559 35664 3569 35744 3577 35844 3587 35914 3592 
36294 36454 3652 36614 36724 3673 368 3683 3691 
98 37014 3707# 3710 37134 3718 37214 7 3730 37 3741 37448 
3750 3755 37584 37664 3771 37744 83775 40214 40384 4039 40424 4043 
4048 40524 53 4057# 4058 40754 4076 40864 41144 4119 41 4142 41454 
4220# 42334 4234 42764 80 42938 4294 42984 4 43014 43054 43 43314 
4374 4613 4628 4651 46 699 4708 4718 47664 47684 47764 4807# 


64 & 4772 4777 
4833# 4834 48364 48404 4841 48444 4845 4855 48624 4867 4922 4923 49314 4935 





L 16 
CZDMIDO DMR=11_ FUNCTIONAL TESTS MACY11 30A(1052) 29=JUL=81 12:42 “PAGE 2 44 SEQ 0206 


C2DMID. P11 29-JUL=81 11:32 CROSS REFERENCE TABLE -- MACR 

4950 49624 4963 4967# 4968 5048 50544 5060 5072 50784 5084 50944 5095 50984 
5120 51264 5133 51464 5147 51504 5151 52364 52418 5244 52554 5265 52714 = 5 

2 53184 29 5348 53544 5355 53584 53664 5379H 53 54154 
5419# 54274 54384 5443 54504 5455 54614 4 54724 5477 54814 54 
5547 55544 5577# 55844 56134 5620# 5626 56324 56 56364 56444 
56674 &# 56914 570 57114 2 57144 5715 57204 5725 57284 5733 7 5743 
5754 57 57714 6 57824 8657 57914 5792 58624 58704 58814 58 
59164 5921 59274 59314 5932 594 5959 59704 5971 59744 5975 59824 59934 

2 6021 60244 603 60474 60534 60614 6062 7# 6 

61174 61284 61404 61504 6157 61674 61744 6175 61784 7 6 61994 6206 62214 
62254 6226 62344 6240 62434 6244 62824 6283 62904 63014 63104 63274 63454 6355 
6377# 63 6387 63 6391 9 6409 64184 64354 6456 6 648 

64914% 6492 649 6505 65084 6509 65304 6531 65384 65494 65564 6578 6587 65954 
6 66074 66274 57 6666 66754 6 66794 80 66874 9 67074 
6740 6749 67574 7 67614 6762 67864 68104 68214 68304 68514 68594 7 

6 69214 6932# 69414 69684 6973 6983 69984 70194 7020 70524 7057 
70744 7075 70784 7079 71054 7110 7119 71274 =7128 71314 7132 1564 7161 

7 71824 7183 7 72014 72124 72314 7236 7245 7254 7257# 7258 72654 
72954 73 73174 73214 73524 7366 73714 73804 73924 74044 

7442 7451 7473 7482 7507 75334 7534 75544 7558 5634 7 

76074 7611 76374 7638 7642 76474 7651 76614 76764 76814 76 77104 77184 77278 
7744 7754 776 7772 7782 7791 7818 78594 7863 78754 76 7882 78874 7891 

7977# =679 80014 8002 80684 80824 8083 81244 81394 8140 81824 82014 


MSTLAB 1# 12314 2190 2207 22224 2227H 2240 23144 2329% 24184 24334 2617 26244 26334 
29 84 3a 34384 34464 


2 29354 30824 30954 31624 31644 32974 33054 332 33544 337 34124 4 
34614 ae 3492H 3 35084 35174 35254 3529 35404 3549%  3559% 35694 5778 
35924 2 36524 36684 36734 368. 36914 37024 37104 37184 37264 
37414 37454 37554 3759 37714 37754 40224 40394 40434 4 534 40584 40764 40914 
41428 41498 42344 42944 4299% 43014 43064 43324 43744 46 4 46514 
46 47084 47184 47664 47724 4777# 48114 48344 48 48414 48454 48554 48674 49234 
49508 49634 50484 5 50724 50844 5095# 50994 51204 51334 51474 51514 2 
52554 52654 5272# 53064 53294 534 3554 5359 53 54094 
54208 54324 54434 54554 4 54774 54824 55474 55544 55 SS77# 65 5 56134 

56334 5637# 56444 S656 5667# 56844 56914 57054 57124 57154 5725# 57334 57434 
57654 57764 5787 5792# 58704 58814 58 9024 59164 59214 59284 5932H 5 
59714 59754 59824 # 09 60144 60214 60254 60334 7# 
61174 61284 61404 61504 61574 61674 61754 61794 6 62224 62264 62404 

8 63014 63104 6327 63454 63554 63644 63774 6387 63914 3984 
64514 6456" 6 64814 64894 64924 65054 65094 65314 65564 65784 65874 

60074 66184 6627# 66574 66764 66804 9 67074 67184 67404  6749# 

67624 68104 68214 14 68594 68674 68824 68914 69214 69324 69414 
9°3e 6983" 6 70204 70524 7057# 70754 7079 71054 71104 71194 71324 
71614 71708 7 71834 72014 2124 872314 723 72454 72544 72584 72654 64 
73184 73224 7352 73 73714 738 73924 74044 74324 867442 = 89674514 

74734 874824 7 75074 75344 84 75814 76114 76424 76514 76764 
76904 77108 77184 7727# 77334 77444 77544 776 7772h §=—77824# = 7791 = 781 7 78764 
78914 79044 79634 7977 79844 8002 80684 80834 81244 81404 81824 8202 8242 82584 
MSTSTL 1# 12314 190% 2207# 2222 22274 22404 23144 2329% 24184 24334 26174 26244 26354 
29. 2935a 82H 8 3095H 31624 31644 32974 33054 33284 33544 33734 34124 34384 34468 
34614 34844 34924 4 35084 35174 35254 3529H 35404 35494 35694 35778 
35924 36524 6684 36734 36854 36914 36984 37024 3710 37184 37264 
37414 37454 37554 3759% 37714 37754 40224 40394 40434 405 40584 40764 40914 
41428 41498 4 42344 42944 4299% 43014 43064 4332 43744 46134 46284 46514 
46 47084 4718 47 4772 = =4777# = 48118 = 48344 48364 = 48414 848454 48554 48674 49234 


B 1 
=11_FUNCTIONAL TESTS MACY11 30A(1052) 29-JUL=81 12:42 PAGE 210 
29-JUL-81 32 


11: 


CROSS REFERENCE TABLE == MACRO 


NAME S 





7858 


SEQ 0207 
5379# 5390 5409% 54164 
55844 55904 6134  5620# 
57254 57334 57438 = 5754a 
59284 59324 84 59598 
60534 60624 61104 
62224 62264 S240# 62444 
63984 094 5184 64354 


78184 786 78764 7882H 
82024 82424 82584 

137; 379 380 1381 
2209 2210 22274 2228 
2625 2626 2627 26334 
29354 29 2937 29 
3376 43744 4375 4376 
4653 4654 46644 4665 
4719 4720 4721 48554 
51204 5121 5122 5123 
5351 53904 5391 5392 
5628 5629 S705# 57 
5960 5961 5962 60144 
63554 6356 6357 6358 
6468 64814 6482 6483 
6659 7 
6868 6869 70 68824 


7238 7239 72454 7246 
419 7420 7421 74328 
74634 7465 74 
503 75074 7508 7509 
7746 7747 77544 7755 
783 7784 7785 779148 
82764 82814 82 83984 
3486 3503 3511 3519 
3679 3685 3693 37 
5077 5125 5240 5426 
6233 6497 7646 


CZDMID/1,CZDMID. 


CZDMIDO DMR-11 Neth oe TESTS MACY11 30A(1052) 29=JUL-81 

CZDMID.P11 29=JUL=81 11:32 

SHUTDN 20718 3405 5320 5381 5579 5615 5686 
6990 7525 7894 797 

SLASH 1# 12314 

STARS 14 12314 

Svc 14 12294 1230 

WAIT 19478 2685 2502 2526 2535 2583 2599 
3398 5894 907 5951 6144 6162 6193 
6962 7046 7099 7150 7225 7289 7408 

XFER 14 12314 

XFERF 14 12314 

XFERT 14 12314 

. ABS. 040100 000 

ERRORS DETECTED: O 


SEQ/DOC/CRF /NL: (OC/SOL=SVC34R.MLB,CZDMID.P11 


RUN-TIME: 34 42 4 SEC a 


RUN-TIME RATIO: 
CORE USED: 19K 


DOCUMENT PAGES: 


140/81= 
(37 pages) 


208 


5911 


2606 
6211 
7721 


. 
12:42 PAGE 211 
CROSS REFERENCE TABLE == MACRO NAMES 


5964 6004 6215 6380 
2709 2735 2784 2799 
6339 6371 6445 6570 


SEQ 0208 
6471 6551 
2903 2910 
6649 6732 


